
Time bar (total: 55.3s)
| 1× | search |
| Probability | Valid | Unknown | Precondition | Infinite | Domain | Can't | Iter |
|---|---|---|---|---|---|---|---|
| 0% | 0% | 99.8% | 0.2% | 0% | 0% | 0% | 0 |
| 0% | 0% | 99.8% | 0.2% | 0% | 0% | 0% | 1 |
| 0% | 0% | 99.8% | 0.2% | 0% | 0% | 0% | 2 |
| 0% | 0% | 99.8% | 0.2% | 0% | 0% | 0% | 3 |
| 0% | 0% | 99.8% | 0.2% | 0% | 0% | 0% | 4 |
| 0% | 0% | 99.8% | 0.2% | 0% | 0% | 0% | 5 |
| 0% | 0% | 99.8% | 0.2% | 0% | 0% | 0% | 6 |
| 0% | 0% | 99.8% | 0.2% | 0% | 0% | 0% | 7 |
| 0% | 0% | 99.8% | 0.2% | 0% | 0% | 0% | 8 |
| 0% | 0% | 99.8% | 0.2% | 0% | 0% | 0% | 9 |
| 0% | 0% | 99.8% | 0.2% | 0% | 0% | 0% | 10 |
| 3.5% | 3.5% | 96.2% | 0.2% | 0% | 0% | 0% | 11 |
| 4.1% | 4.1% | 95.7% | 0.2% | 0% | 0% | 0% | 12 |
Compiled 185 to 58 computations (68.6% saved)
| 3.9s | 2 309× | 1 | valid |
| 2.3s | 5 947× | 0 | valid |
| 1.1s | 2 294× | 1 | exit |
ival-mult: 1.4s (21.1% of total)ival-sin: 1.2s (16.8% of total)ival-pow2: 1.1s (16.5% of total)ival-div: 1.1s (16.1% of total)ival-cos: 936.0ms (13.7% of total)ival-add: 319.0ms (4.7% of total)adjust: 286.0ms (4.2% of total)ival-sqrt: 172.0ms (2.5% of total)ival-sub: 119.0ms (1.7% of total)ival-neg: 105.0ms (1.5% of total)ival-pi: 50.0ms (0.7% of total)exact: 16.0ms (0.2% of total)ival-true: 10.0ms (0.1% of total)ival-assert: 5.0ms (0.1% of total)| 1× | egg-herbie |
| 8 544× | lower-*.f32 |
| 8 512× | lower-*.f64 |
| 2 766× | lower-fma.f64 |
| 2 766× | lower-fma.f32 |
| 2 102× | lower-/.f32 |
Useful iterations: 0 (0.0ms)
| Iter | Nodes | Cost |
|---|---|---|
| 0 | 544 | 3725 |
| 1 | 1608 | 3576 |
| 2 | 7362 | 3576 |
| 0 | 56 | 183 |
| 0 | 104 | 183 |
| 1 | 187 | 180 |
| 2 | 622 | 180 |
| 3 | 5592 | 177 |
| 0 | 8429 | 172 |
| 1× | iter limit |
| 1× | node limit |
| 1× | iter limit |
| 1× | node limit |
| Inputs |
|---|
(/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) |
| Outputs |
|---|
(/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) |
(*.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 (sqrt.f64 (/.f64 (*.f64 (*.f64 #s(literal 8 binary64) (*.f64 (*.f64 b (*.f64 a (*.f64 b a))) (*.f64 b (*.f64 a (*.f64 b a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 angle (/.f64 (PI.f64) #s(literal 180 binary64))))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 angle (/.f64 (PI.f64) #s(literal 180 binary64))))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (/.f64 (PI.f64) #s(literal 180 binary64))))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (/.f64 (PI.f64) #s(literal 180 binary64))))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 angle (/.f64 (PI.f64) #s(literal 180 binary64))))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 angle (/.f64 (PI.f64) #s(literal 180 binary64))))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (/.f64 (PI.f64) #s(literal 180 binary64))))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (/.f64 (PI.f64) #s(literal 180 binary64))))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (*.f64 (sin.f64 (*.f64 angle (/.f64 (PI.f64) #s(literal 180 binary64)))) (/.f64 (cos.f64 (*.f64 angle (/.f64 (PI.f64) #s(literal 180 binary64)))) (*.f64 x-scale y-scale)))))))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))) (*.f64 (*.f64 b a) (*.f64 #s(literal 4 binary64) (*.f64 b a))))) |
(abs y-scale)
(abs x-scale)
(abs b)
(abs a)
| Ground Truth | Overpredictions | Example | Underpredictions | Example | Subexpression |
|---|---|---|---|---|---|
| 156 | 0 | - | 3 | (6.104365656667029e-286 3.464358660986122e-122 -2.520388591951328e+222 2.7406462517972865e-83 1.290109622842912e-268) | (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) |
| 91 | 0 | - | 0 | - | (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) |
| 91 | 0 | - | 0 | - | (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) |
| 87 | 0 | - | 1 | (9.838772800036434e-306 1.0938917008416593e+203 2.9547923664433588e-307 9.89779007266286e-308 6.02826348339892e+151) | (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))) |
| 63 | 0 | - | 0 | - | (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64)))) |
| 46 | 1 | (3.320175262495707e-166 1.7610484815372392e-79 -2.4352755871349463e+62 5.117428575241923e+121 3.1466462899541563e-183) | 2 | (1.1098787485896213e-114 6.562990552710561e+104 -7.053348002628431e+27 5.672693037173479e+75 9.34606114509216e+94) | (sqrt.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))))) |
| 42 | 0 | - | 0 | - | (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) |
| 40 | 0 | - | 2 | (2.2065995525516253e-245 5.690793902917273e-157 4.768601005703474e+307 1.1012600890213476e-295 3.197698257752526e-49) | (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) |
| 36 | 0 | - | 2 | (2.0100943215532117e-157 2.2089541578935306e-280 -4.9241599312259914e-111 6.796573872870789e-274 8.348925036323955e-97) | (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) |
| 33 | 1 | (1.4534736180909835e-198 1.0353271764160812e-155 2.65458441842157e-124 1.1013160674721981e+21 9.468580546081183e-134) | 1 | (6.159720799368101e-76 1.0241458146773692e-121 -1.4122591679189623e-65 5.3743977366269293e+98 5.546527773010228e-47) | (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) |
| 33 | 0 | - | 3 | (2.2065995525516253e-245 5.690793902917273e-157 4.768601005703474e+307 1.1012600890213476e-295 3.197698257752526e-49) | (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) |
| 30 | 0 | - | 0 | - | (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64)))))) |
| 30 | 0 | - | 0 | - | (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) |
| 28 | 0 | - | 1 | (6.908758547402422e-129 6.53088537848898e+274 -7.799113162556894e+107 5.6780639390546025e+141 1.3160095668558941e+163) | (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) |
| 15 | 0 | - | 0 | - | (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) |
| 14 | 0 | - | 0 | - | (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) |
| 10 | 0 | - | 0 | - | (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) |
| 1 | 0 | - | 1 | (3.0388954964366023e-70 5.14109910430207e-309 -2.5861998707601414e+58 1.7624408137666298e-34 2.8638492624373684e-295) | (PI.f64) |
| 0 | 0 | - | 0 | - | x-scale |
| 0 | 0 | - | 0 | - | (*.f64 b a) |
| 0 | 0 | - | 0 | - | (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) |
| 0 | 0 | - | 0 | - | (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) |
| 0 | 0 | - | 0 | - | (+.f64 (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) |
| 0 | 0 | - | 0 | - | (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) |
| 0 | 0 | - | 0 | - | (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)) |
| 0 | 0 | - | 0 | - | (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))) |
| 0 | 0 | - | 0 | - | (*.f64 x-scale y-scale) |
| 0 | 0 | - | 0 | - | (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)) |
| 0 | 0 | - | 0 | - | (*.f64 b (neg.f64 a)) |
| 0 | 0 | - | 0 | - | (pow.f64 b #s(literal 2 binary64)) |
| 0 | 0 | - | 0 | - | (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) |
| 0 | 0 | - | 0 | - | (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) |
| 0 | 0 | - | 0 | - | (neg.f64 a) |
| 0 | 0 | - | 0 | - | (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) |
| 0 | 0 | - | 0 | - | (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) |
| 0 | 0 | - | 0 | - | (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) |
| 0 | 0 | - | 0 | - | #s(literal 180 binary64) |
| 0 | 0 | - | 0 | - | (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) |
| 0 | 0 | - | 0 | - | angle |
| 0 | 0 | - | 0 | - | #s(literal 2 binary64) |
| 0 | 0 | - | 0 | - | (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) |
| 0 | 0 | - | 0 | - | (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) |
| 0 | 0 | - | 0 | - | b |
| 0 | 0 | - | 0 | - | a |
| 0 | 1 | (3.2657021398858342e-142 1.0502020580072906e-304 1.912961223953894e-44 1.4119557825295323e-228 3.519260519708259e-56) | 0 | - | (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) |
| 0 | 0 | - | 0 | - | (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))) |
| 0 | 0 | - | 0 | - | (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) |
| 0 | 0 | - | 0 | - | (pow.f64 a #s(literal 2 binary64)) |
| 0 | 0 | - | 0 | - | (neg.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64)))))))) |
| 0 | 0 | - | 0 | - | (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) |
| 0 | 0 | - | 0 | - | (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) |
| 0 | 0 | - | 0 | - | (/.f64 angle #s(literal 180 binary64)) |
| 0 | 0 | - | 0 | - | (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64)) |
| 0 | 0 | - | 0 | - | #s(literal 4 binary64) |
| 0 | 0 | - | 0 | - | y-scale |
| 0 | 0 | - | 0 | - | (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) |
| Operator | Subexpression | Explanation | Count | |
|---|---|---|---|---|
sin.f64 | (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) | sensitivity | 91 | 0 |
cos.f64 | (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) | sensitivity | 91 | 1 |
/.f64 | (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) | u/u | 67 | 0 |
| ↳ | (+.f64 (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) | underflow | 17 | |
| ↳ | (*.f64 b a) | underflow | 90 | |
| ↳ | (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) | underflow | 36 | |
| ↳ | (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) | underflow | 17 | |
| ↳ | (*.f64 b (neg.f64 a)) | underflow | 90 | |
| ↳ | (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) | underflow | 94 | |
| ↳ | (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) | underflow | 113 | |
| ↳ | (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) | underflow | 94 | |
| ↳ | (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) | underflow | 27 | |
| ↳ | (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) | underflow | 66 | |
| ↳ | (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) | underflow | 18 | |
| ↳ | (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) | underflow | 42 | |
| ↳ | (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) | underflow | 56 | |
| ↳ | (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) | underflow | 17 | |
| ↳ | (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) | underflow | 18 | |
| ↳ | (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) | underflow | 160 | |
| ↳ | (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)) | underflow | 75 | |
| ↳ | (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) | underflow | 86 | |
| ↳ | (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) | underflow | 114 | |
| ↳ | (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64)))) | underflow | 17 | |
| ↳ | (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) | underflow | 41 | |
| ↳ | (neg.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64)))))))) | underflow | 77 | |
| ↳ | (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) | underflow | 36 | |
| ↳ | (sqrt.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))))) | underflow | 77 | |
| ↳ | (pow.f64 b #s(literal 2 binary64)) | underflow | 57 | |
| ↳ | (*.f64 x-scale y-scale) | underflow | 30 | |
| ↳ | (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) | underflow | 216 | |
| ↳ | (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64)) | underflow | 69 | |
| ↳ | (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) | underflow | 52 | |
| ↳ | (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))) | underflow | 184 | |
| ↳ | (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) | underflow | 92 | |
| ↳ | (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) | underflow | 86 | |
| ↳ | (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) | underflow | 250 | |
| ↳ | (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) | underflow | 84 | |
| ↳ | (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) | underflow | 60 | |
| ↳ | (pow.f64 a #s(literal 2 binary64)) | underflow | 80 | |
| ↳ | (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))) | underflow | 87 | |
| ↳ | (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))) | underflow | 27 | |
| ↳ | (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) | underflow | 10 | |
| ↳ | (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64)))))) | underflow | 99 | |
| ↳ | (*.f64 b a) | underflow | 45 | |
| ↳ | (*.f64 b (neg.f64 a)) | underflow | 45 | |
| ↳ | (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)) | underflow | 75 | |
| ↳ | (*.f64 x-scale y-scale) | underflow | 30 | |
| ↳ | (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))) | underflow | 92 | |
| ↳ | (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) | underflow | 92 | |
| ↳ | (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))) | underflow | 87 | |
/.f64 | (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) | o/o | 59 | 0 |
| ↳ | (+.f64 (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) | overflow | 111 | |
| ↳ | (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) | overflow | 42 | |
| ↳ | (*.f64 b a) | overflow | 48 | |
| ↳ | (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) | overflow | 58 | |
| ↳ | (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) | overflow | 111 | |
| ↳ | (*.f64 b (neg.f64 a)) | overflow | 48 | |
| ↳ | (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) | overflow | 146 | |
| ↳ | (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) | overflow | 79 | |
| ↳ | (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) | overflow | 136 | |
| ↳ | (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) | overflow | 164 | |
| ↳ | (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) | overflow | 132 | |
| ↳ | (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) | overflow | 100 | |
| ↳ | (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) | overflow | 60 | |
| ↳ | (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) | overflow | 152 | |
| ↳ | (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) | overflow | 111 | |
| ↳ | (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) | overflow | 100 | |
| ↳ | (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) | overflow | 108 | |
| ↳ | (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)) | overflow | 79 | |
| ↳ | (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) | overflow | 112 | |
| ↳ | (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64)))) | overflow | 111 | |
| ↳ | (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) | overflow | 59 | |
| ↳ | (neg.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64)))))))) | overflow | 90 | |
| ↳ | (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) | overflow | 58 | |
| ↳ | (sqrt.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))))) | overflow | 90 | |
| ↳ | (pow.f64 b #s(literal 2 binary64)) | overflow | 56 | |
| ↳ | (*.f64 x-scale y-scale) | overflow | 35 | |
| ↳ | (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) | overflow | 48 | |
| ↳ | (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64)) | overflow | 101 | |
| ↳ | (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) | overflow | 148 | |
| ↳ | (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))) | overflow | 114 | |
| ↳ | (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) | overflow | 57 | |
| ↳ | (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) | overflow | 62 | |
| ↳ | (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) | overflow | 126 | |
| ↳ | (pow.f64 a #s(literal 2 binary64)) | overflow | 54 | |
| ↳ | (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))) | overflow | 62 | |
| ↳ | (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))) | overflow | 164 | |
| ↳ | (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64)))))) | overflow | 113 | |
| ↳ | (*.f64 b a) | overflow | 24 | |
| ↳ | (*.f64 b (neg.f64 a)) | overflow | 24 | |
| ↳ | (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)) | overflow | 79 | |
| ↳ | (*.f64 x-scale y-scale) | overflow | 35 | |
| ↳ | (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))) | overflow | 57 | |
| ↳ | (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) | overflow | 57 | |
| ↳ | (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))) | overflow | 62 | |
sqrt.f64 | (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64)))) | oflow-rescue | 53 | 0 |
| ↳ | (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) | overflow | 58 | |
| ↳ | (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) | overflow | 68 | |
| ↳ | (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) | overflow | 58 | |
| ↳ | (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) | overflow | 21 | |
| ↳ | (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))) | overflow | 164 | |
| ↳ | (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) | overflow | 111 | |
| ↳ | (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) | overflow | 73 | |
| ↳ | (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) | overflow | 164 | |
| ↳ | (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) | overflow | 66 | |
| ↳ | (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) | overflow | 100 | |
| ↳ | (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) | overflow | 60 | |
| ↳ | (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) | overflow | 76 | |
| ↳ | (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) | overflow | 100 | |
| ↳ | (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) | overflow | 54 | |
| ↳ | (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) | overflow | 56 | |
| ↳ | (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64)))) | overflow | 111 | |
| ↳ | (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) | overflow | 59 | |
| ↳ | (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) | overflow | 24 | |
| ↳ | (pow.f64 b #s(literal 2 binary64)) | overflow | 56 | |
| ↳ | (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64)) | overflow | 101 | |
| ↳ | (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) | overflow | 74 | |
| ↳ | (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) | overflow | 63 | |
| ↳ | (pow.f64 a #s(literal 2 binary64)) | overflow | 54 | |
*.f64 | (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) | n*o | 42 | 0 |
/.f64 | (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))) | u/u | 40 | 0 |
| ↳ | (*.f64 b a) | underflow | 45 | |
| ↳ | (*.f64 b (neg.f64 a)) | underflow | 45 | |
| ↳ | (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))) | underflow | 92 | |
| ↳ | (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) | underflow | 92 | |
| ↳ | (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)) | underflow | 75 | |
| ↳ | (*.f64 x-scale y-scale) | underflow | 30 | |
-.f64 | (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) | nan-rescue | 30 | 0 |
| ↳ | (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) | overflow | 73 | |
| ↳ | (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) | overflow | 56 | |
| ↳ | (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) | overflow | 74 | |
| ↳ | (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) | overflow | 21 | |
| ↳ | (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) | overflow | 63 | |
| ↳ | (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) | overflow | 68 | |
| ↳ | (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) | overflow | 54 | |
| ↳ | (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) | overflow | 24 | |
| ↳ | (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) | overflow | 66 | |
| ↳ | (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) | overflow | 76 | |
/.f64 | (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))) | o/o | 27 | 0 |
| ↳ | (*.f64 b a) | overflow | 24 | |
| ↳ | (*.f64 b (neg.f64 a)) | overflow | 24 | |
| ↳ | (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))) | overflow | 57 | |
| ↳ | (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) | overflow | 57 | |
| ↳ | (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)) | overflow | 79 | |
| ↳ | (*.f64 x-scale y-scale) | overflow | 35 | |
/.f64 | (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) | o/n | 27 | 0 |
| ↳ | (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) | overflow | 56 | |
| ↳ | (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) | overflow | 74 | |
| ↳ | (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) | overflow | 21 | |
sqrt.f64 | (sqrt.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))))) | oflow-rescue | 23 | 0 |
| ↳ | (+.f64 (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) | overflow | 111 | |
| ↳ | (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) | overflow | 42 | |
| ↳ | (*.f64 b a) | overflow | 48 | |
| ↳ | (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) | overflow | 58 | |
| ↳ | (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) | overflow | 111 | |
| ↳ | (*.f64 b (neg.f64 a)) | overflow | 48 | |
| ↳ | (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) | overflow | 146 | |
| ↳ | (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) | overflow | 79 | |
| ↳ | (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) | overflow | 136 | |
| ↳ | (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) | overflow | 164 | |
| ↳ | (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) | overflow | 132 | |
| ↳ | (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) | overflow | 100 | |
| ↳ | (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) | overflow | 60 | |
| ↳ | (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) | overflow | 152 | |
| ↳ | (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) | overflow | 111 | |
| ↳ | (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) | overflow | 100 | |
| ↳ | (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) | overflow | 108 | |
| ↳ | (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)) | overflow | 79 | |
| ↳ | (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) | overflow | 112 | |
| ↳ | (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64)))) | overflow | 111 | |
| ↳ | (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) | overflow | 59 | |
| ↳ | (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) | overflow | 58 | |
| ↳ | (sqrt.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))))) | overflow | 90 | |
| ↳ | (pow.f64 b #s(literal 2 binary64)) | overflow | 56 | |
| ↳ | (*.f64 x-scale y-scale) | overflow | 35 | |
| ↳ | (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) | overflow | 48 | |
| ↳ | (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64)) | overflow | 101 | |
| ↳ | (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) | overflow | 148 | |
| ↳ | (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))) | overflow | 114 | |
| ↳ | (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) | overflow | 57 | |
| ↳ | (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) | overflow | 62 | |
| ↳ | (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) | overflow | 126 | |
| ↳ | (pow.f64 a #s(literal 2 binary64)) | overflow | 54 | |
| ↳ | (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))) | overflow | 62 | |
| ↳ | (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))) | overflow | 164 | |
| ↳ | (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64)))))) | overflow | 113 | |
/.f64 | (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) | o/n | 23 | 0 |
| ↳ | (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) | overflow | 76 | |
| ↳ | (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) | overflow | 54 | |
| ↳ | (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) | overflow | 24 | |
sqrt.f64 | (sqrt.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))))) | uflow-rescue | 22 | 0 |
| ↳ | (+.f64 (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) | underflow | 17 | |
| ↳ | (*.f64 b a) | underflow | 90 | |
| ↳ | (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) | underflow | 36 | |
| ↳ | (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) | underflow | 17 | |
| ↳ | (*.f64 b (neg.f64 a)) | underflow | 90 | |
| ↳ | (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) | underflow | 94 | |
| ↳ | (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) | underflow | 113 | |
| ↳ | (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) | underflow | 94 | |
| ↳ | (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) | underflow | 27 | |
| ↳ | (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) | underflow | 66 | |
| ↳ | (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) | underflow | 18 | |
| ↳ | (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) | underflow | 42 | |
| ↳ | (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) | underflow | 56 | |
| ↳ | (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) | underflow | 17 | |
| ↳ | (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) | underflow | 18 | |
| ↳ | (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) | underflow | 160 | |
| ↳ | (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)) | underflow | 75 | |
| ↳ | (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) | underflow | 86 | |
| ↳ | (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) | underflow | 114 | |
| ↳ | (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64)))) | underflow | 17 | |
| ↳ | (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) | underflow | 41 | |
| ↳ | (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) | underflow | 36 | |
| ↳ | (sqrt.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))))) | underflow | 77 | |
| ↳ | (pow.f64 b #s(literal 2 binary64)) | underflow | 57 | |
| ↳ | (*.f64 x-scale y-scale) | underflow | 30 | |
| ↳ | (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) | underflow | 216 | |
| ↳ | (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64)) | underflow | 69 | |
| ↳ | (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) | underflow | 52 | |
| ↳ | (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))) | underflow | 184 | |
| ↳ | (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) | underflow | 92 | |
| ↳ | (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) | underflow | 86 | |
| ↳ | (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) | underflow | 250 | |
| ↳ | (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) | underflow | 84 | |
| ↳ | (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) | underflow | 60 | |
| ↳ | (pow.f64 a #s(literal 2 binary64)) | underflow | 80 | |
| ↳ | (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))) | underflow | 87 | |
| ↳ | (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))) | underflow | 27 | |
| ↳ | (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) | underflow | 10 | |
| ↳ | (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64)))))) | underflow | 99 | |
/.f64 | (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) | o/n | 20 | 0 |
| ↳ | (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) | overflow | 58 | |
| ↳ | (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) | overflow | 100 | |
| ↳ | (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) | overflow | 100 | |
| ↳ | (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) | overflow | 58 | |
| ↳ | (pow.f64 b #s(literal 2 binary64)) | overflow | 56 | |
| ↳ | (pow.f64 a #s(literal 2 binary64)) | overflow | 54 | |
/.f64 | (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) | o/n | 17 | 0 |
| ↳ | (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) | overflow | 58 | |
| ↳ | (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) | overflow | 100 | |
| ↳ | (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) | overflow | 58 | |
| ↳ | (pow.f64 b #s(literal 2 binary64)) | overflow | 56 | |
| ↳ | (pow.f64 a #s(literal 2 binary64)) | overflow | 54 | |
| ↳ | (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) | overflow | 100 | |
| ↳ | (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) | overflow | 60 | |
/.f64 | (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) | o/n | 14 | 0 |
| ↳ | (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) | overflow | 54 | |
| ↳ | (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) | overflow | 24 | |
| ↳ | (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) | overflow | 66 | |
| ↳ | (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) | overflow | 76 | |
*.f64 | (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64)))))) | n*o | 12 | 0 |
/.f64 | (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) | o/n | 11 | 0 |
| ↳ | (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) | overflow | 56 | |
| ↳ | (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) | overflow | 74 | |
| ↳ | (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) | overflow | 21 | |
| ↳ | (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) | overflow | 63 | |
/.f64 | (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) | n/u | 10 | 0 |
| ↳ | (*.f64 b a) | underflow | 45 | |
| ↳ | (*.f64 b (neg.f64 a)) | underflow | 45 | |
| ↳ | (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)) | underflow | 75 | |
| ↳ | (*.f64 x-scale y-scale) | underflow | 30 | |
| ↳ | (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))) | underflow | 92 | |
| ↳ | (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) | underflow | 92 | |
| ↳ | (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))) | underflow | 87 | |
sqrt.f64 | (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64)))) | uflow-rescue | 10 | 0 |
| ↳ | (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) | underflow | 36 | |
| ↳ | (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) | underflow | 47 | |
| ↳ | (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) | underflow | 36 | |
| ↳ | (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) | underflow | 17 | |
| ↳ | (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) | underflow | 47 | |
| ↳ | (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) | underflow | 27 | |
| ↳ | (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) | underflow | 33 | |
| ↳ | (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) | underflow | 18 | |
| ↳ | (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) | underflow | 42 | |
| ↳ | (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) | underflow | 28 | |
| ↳ | (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) | underflow | 18 | |
| ↳ | (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) | underflow | 80 | |
| ↳ | (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) | underflow | 43 | |
| ↳ | (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) | underflow | 57 | |
| ↳ | (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64)))) | underflow | 17 | |
| ↳ | (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) | underflow | 41 | |
| ↳ | (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) | underflow | 108 | |
| ↳ | (pow.f64 b #s(literal 2 binary64)) | underflow | 57 | |
| ↳ | (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64)) | underflow | 69 | |
| ↳ | (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) | underflow | 26 | |
| ↳ | (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) | underflow | 125 | |
| ↳ | (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) | underflow | 42 | |
| ↳ | (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) | underflow | 30 | |
| ↳ | (pow.f64 a #s(literal 2 binary64)) | underflow | 80 | |
| ↳ | (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))) | underflow | 27 | |
| ↳ | (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) | underflow | 6 | |
/.f64 | (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) | u/n | 10 | 0 |
| ↳ | (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) | underflow | 28 | |
| ↳ | (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) | underflow | 80 | |
| ↳ | (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) | underflow | 108 | |
| ↳ | (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) | underflow | 42 | |
| ↳ | (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) | underflow | 2 | |
*.f64 | (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) | n*o | 10 | 0 |
-.f64 | (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) | nan-rescue | 10 | 0 |
| ↳ | (pow.f64 b #s(literal 2 binary64)) | overflow | 56 | |
| ↳ | (pow.f64 a #s(literal 2 binary64)) | overflow | 54 | |
*.f64 | (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64)))))) | n*u | 10 | 0 |
*.f64 | (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) | n*u | 9 | 0 |
/.f64 | (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))) | n/o | 8 | 0 |
| ↳ | (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)) | overflow | 79 | |
| ↳ | (*.f64 x-scale y-scale) | overflow | 35 | |
/.f64 | (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) | u/n | 8 | 0 |
| ↳ | (+.f64 (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) | underflow | 17 | |
| ↳ | (*.f64 b a) | underflow | 90 | |
| ↳ | (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) | underflow | 36 | |
| ↳ | (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) | underflow | 17 | |
| ↳ | (*.f64 b (neg.f64 a)) | underflow | 90 | |
| ↳ | (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) | underflow | 94 | |
| ↳ | (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) | underflow | 113 | |
| ↳ | (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) | underflow | 94 | |
| ↳ | (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) | underflow | 27 | |
| ↳ | (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) | underflow | 66 | |
| ↳ | (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) | underflow | 18 | |
| ↳ | (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) | underflow | 42 | |
| ↳ | (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) | underflow | 56 | |
| ↳ | (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) | underflow | 17 | |
| ↳ | (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) | underflow | 18 | |
| ↳ | (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) | underflow | 160 | |
| ↳ | (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)) | underflow | 75 | |
| ↳ | (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) | underflow | 86 | |
| ↳ | (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) | underflow | 114 | |
| ↳ | (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64)))) | underflow | 17 | |
| ↳ | (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) | underflow | 41 | |
| ↳ | (neg.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64)))))))) | underflow | 77 | |
| ↳ | (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) | underflow | 36 | |
| ↳ | (sqrt.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))))) | underflow | 77 | |
| ↳ | (pow.f64 b #s(literal 2 binary64)) | underflow | 57 | |
| ↳ | (*.f64 x-scale y-scale) | underflow | 30 | |
| ↳ | (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) | underflow | 216 | |
| ↳ | (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64)) | underflow | 69 | |
| ↳ | (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) | underflow | 52 | |
| ↳ | (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))) | underflow | 184 | |
| ↳ | (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) | underflow | 92 | |
| ↳ | (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) | underflow | 86 | |
| ↳ | (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) | underflow | 250 | |
| ↳ | (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) | underflow | 84 | |
| ↳ | (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) | underflow | 60 | |
| ↳ | (pow.f64 a #s(literal 2 binary64)) | underflow | 80 | |
| ↳ | (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))) | underflow | 87 | |
| ↳ | (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))) | underflow | 27 | |
| ↳ | (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) | underflow | 10 | |
| ↳ | (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64)))))) | underflow | 99 | |
/.f64 | (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) | u/n | 8 | 0 |
| ↳ | (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) | underflow | 36 | |
| ↳ | (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) | underflow | 18 | |
| ↳ | (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) | underflow | 36 | |
| ↳ | (pow.f64 b #s(literal 2 binary64)) | underflow | 57 | |
| ↳ | (pow.f64 a #s(literal 2 binary64)) | underflow | 80 | |
| ↳ | (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) | underflow | 2 | |
| ↳ | (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) | underflow | 18 | |
| ↳ | (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) | underflow | 42 | |
*.f64 | (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64)))))) | u*o | 8 | 0 |
| ↳ | (*.f64 b a) | underflow | 90 | |
| ↳ | (*.f64 b (neg.f64 a)) | underflow | 90 | |
| ↳ | (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) | underflow | 113 | |
| ↳ | (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)) | underflow | 75 | |
| ↳ | (*.f64 x-scale y-scale) | underflow | 30 | |
| ↳ | (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))) | underflow | 184 | |
| ↳ | (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))) | underflow | 87 | |
| ↳ | (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) | underflow | 92 | |
| ↳ | (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) | underflow | 86 | |
| ↳ | (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) | overflow | 58 | |
| ↳ | (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) | overflow | 136 | |
| ↳ | (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) | overflow | 58 | |
| ↳ | (+.f64 (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) | overflow | 111 | |
| ↳ | (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) | overflow | 42 | |
| ↳ | (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))) | overflow | 164 | |
| ↳ | (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) | overflow | 111 | |
| ↳ | (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) | overflow | 146 | |
| ↳ | (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) | overflow | 164 | |
| ↳ | (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) | overflow | 132 | |
| ↳ | (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) | overflow | 100 | |
| ↳ | (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) | overflow | 60 | |
| ↳ | (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) | overflow | 152 | |
| ↳ | (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) | overflow | 111 | |
| ↳ | (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) | overflow | 100 | |
| ↳ | (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) | overflow | 108 | |
| ↳ | (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) | overflow | 112 | |
| ↳ | (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64)))) | overflow | 111 | |
| ↳ | (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) | overflow | 59 | |
| ↳ | (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) | overflow | 48 | |
| ↳ | (pow.f64 b #s(literal 2 binary64)) | overflow | 56 | |
| ↳ | (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64)) | overflow | 101 | |
| ↳ | (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) | overflow | 148 | |
| ↳ | (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) | overflow | 126 | |
| ↳ | (pow.f64 a #s(literal 2 binary64)) | overflow | 54 | |
/.f64 | (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) | u/n | 7 | 0 |
| ↳ | (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) | underflow | 43 | |
| ↳ | (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) | underflow | 57 | |
| ↳ | (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) | underflow | 26 | |
| ↳ | (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) | underflow | 125 | |
| ↳ | (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) | underflow | 2 | |
/.f64 | (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) | o/n | 6 | 0 |
| ↳ | (+.f64 (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) | overflow | 111 | |
| ↳ | (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) | overflow | 42 | |
| ↳ | (*.f64 b a) | overflow | 48 | |
| ↳ | (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) | overflow | 58 | |
| ↳ | (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) | overflow | 111 | |
| ↳ | (*.f64 b (neg.f64 a)) | overflow | 48 | |
| ↳ | (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) | overflow | 146 | |
| ↳ | (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) | overflow | 79 | |
| ↳ | (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) | overflow | 136 | |
| ↳ | (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) | overflow | 164 | |
| ↳ | (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) | overflow | 132 | |
| ↳ | (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) | overflow | 100 | |
| ↳ | (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) | overflow | 60 | |
| ↳ | (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) | overflow | 152 | |
| ↳ | (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) | overflow | 111 | |
| ↳ | (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) | overflow | 100 | |
| ↳ | (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) | overflow | 108 | |
| ↳ | (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)) | overflow | 79 | |
| ↳ | (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) | overflow | 112 | |
| ↳ | (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64)))) | overflow | 111 | |
| ↳ | (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) | overflow | 59 | |
| ↳ | (neg.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64)))))))) | overflow | 90 | |
| ↳ | (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) | overflow | 58 | |
| ↳ | (sqrt.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))))) | overflow | 90 | |
| ↳ | (pow.f64 b #s(literal 2 binary64)) | overflow | 56 | |
| ↳ | (*.f64 x-scale y-scale) | overflow | 35 | |
| ↳ | (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) | overflow | 48 | |
| ↳ | (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64)) | overflow | 101 | |
| ↳ | (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) | overflow | 148 | |
| ↳ | (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))) | overflow | 114 | |
| ↳ | (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) | overflow | 57 | |
| ↳ | (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) | overflow | 62 | |
| ↳ | (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) | overflow | 126 | |
| ↳ | (pow.f64 a #s(literal 2 binary64)) | overflow | 54 | |
| ↳ | (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))) | overflow | 62 | |
| ↳ | (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))) | overflow | 164 | |
| ↳ | (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64)))))) | overflow | 113 | |
*.f64 | (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) | o*u | 5 | 0 |
| ↳ | (*.f64 b a) | overflow | 24 | |
| ↳ | (*.f64 b (neg.f64 a)) | overflow | 24 | |
| ↳ | (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)) | overflow | 79 | |
| ↳ | (*.f64 x-scale y-scale) | overflow | 35 | |
| ↳ | (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))) | overflow | 57 | |
| ↳ | (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))) | overflow | 62 | |
| ↳ | (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) | overflow | 57 | |
| ↳ | (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) | overflow | 62 | |
| ↳ | (*.f64 b a) | underflow | 45 | |
| ↳ | (*.f64 b (neg.f64 a)) | underflow | 45 | |
| ↳ | (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))) | underflow | 92 | |
/.f64 | (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))) | o/n | 4 | 0 |
| ↳ | (*.f64 b a) | overflow | 24 | |
| ↳ | (*.f64 b (neg.f64 a)) | overflow | 24 | |
| ↳ | (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))) | overflow | 57 | |
| ↳ | (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) | overflow | 57 | |
/.f64 | (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))) | n/u | 4 | 0 |
| ↳ | (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)) | underflow | 75 | |
| ↳ | (*.f64 x-scale y-scale) | underflow | 30 | |
/.f64 | (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) | u/n | 3 | 0 |
| ↳ | (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) | underflow | 36 | |
| ↳ | (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) | underflow | 18 | |
| ↳ | (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) | underflow | 18 | |
| ↳ | (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) | underflow | 36 | |
| ↳ | (pow.f64 b #s(literal 2 binary64)) | underflow | 57 | |
| ↳ | (pow.f64 a #s(literal 2 binary64)) | underflow | 80 | |
| ↳ | (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) | underflow | 2 | |
/.f64 | (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) | n/o | 3 | 0 |
| ↳ | (*.f64 b a) | overflow | 24 | |
| ↳ | (*.f64 b (neg.f64 a)) | overflow | 24 | |
| ↳ | (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)) | overflow | 79 | |
| ↳ | (*.f64 x-scale y-scale) | overflow | 35 | |
| ↳ | (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))) | overflow | 57 | |
| ↳ | (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) | overflow | 57 | |
| ↳ | (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))) | overflow | 62 | |
/.f64 | (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))) | u/n | 3 | 0 |
| ↳ | (*.f64 b a) | underflow | 45 | |
| ↳ | (*.f64 b (neg.f64 a)) | underflow | 45 | |
| ↳ | (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))) | underflow | 92 | |
| ↳ | (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) | underflow | 92 | |
*.f64 | (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) | u*o | 3 | 0 |
| ↳ | (*.f64 b a) | underflow | 45 | |
| ↳ | (*.f64 b (neg.f64 a)) | underflow | 45 | |
| ↳ | (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)) | underflow | 75 | |
| ↳ | (*.f64 x-scale y-scale) | underflow | 30 | |
| ↳ | (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))) | underflow | 92 | |
| ↳ | (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))) | underflow | 87 | |
| ↳ | (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) | underflow | 92 | |
| ↳ | (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) | underflow | 86 | |
| ↳ | (*.f64 b a) | overflow | 24 | |
| ↳ | (*.f64 b (neg.f64 a)) | overflow | 24 | |
| ↳ | (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))) | overflow | 57 | |
/.f64 | (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) | u/n | 2 | 0 |
| ↳ | (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) | underflow | 43 | |
| ↳ | (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) | underflow | 57 | |
| ↳ | (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) | underflow | 26 | |
| ↳ | (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) | underflow | 125 | |
| ↳ | (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) | underflow | 30 | |
| ↳ | (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) | underflow | 2 | |
/.f64 | (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) | u/n | 1 | 0 |
| ↳ | (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) | underflow | 80 | |
| ↳ | (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) | underflow | 108 | |
| ↳ | (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) | underflow | 42 | |
| ↳ | (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) | underflow | 2 | |
| ↳ | (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) | underflow | 33 | |
| ↳ | (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) | underflow | 28 | |
*.f64 | (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) | n*u | 1 | 0 |
| Predicted + | Predicted - | |
|---|---|---|
| + | 246 | 1 |
| - | 6 | 3 |
| Predicted + | Predicted Maybe | Predicted - | |
|---|---|---|---|
| + | 246 | 0 | 1 |
| - | 6 | 0 | 3 |
| number | freq |
|---|---|
| 0 | 4 |
| 1 | 35 |
| 2 | 70 |
| 3 | 46 |
| 4 | 46 |
| 5 | 33 |
| 6 | 10 |
| 7 | 8 |
| 8 | 2 |
| 9 | 2 |
| Predicted + | Predicted Maybe | Predicted - | |
|---|---|---|---|
| + | 1 | 0 | 0 |
| - | 0 | 0 | 0 |
| 252.0ms | 154× | 1 | valid |
| 141.0ms | 356× | 0 | valid |
| 14.0ms | 2× | 5 | exit |
Compiled 3 606 to 228 computations (93.7% saved)
ival-cos: 71.0ms (20.6% of total)ival-sin: 60.0ms (17.4% of total)ival-mult: 59.0ms (17.1% of total)ival-pow2: 49.0ms (14.2% of total)ival-div: 38.0ms (11% of total)ival-pi: 22.0ms (6.4% of total)ival-add: 13.0ms (3.8% of total)adjust: 10.0ms (2.9% of total)ival-sqrt: 10.0ms (2.9% of total)ival-sub: 7.0ms (2% of total)ival-neg: 5.0ms (1.4% of total)exact: 1.0ms (0.3% of total)ival-true: 1.0ms (0.3% of total)ival-assert: 0.0ms (0% of total)Compiled 5 to 5 computations (0% saved)
| Status | Accuracy | Program |
|---|---|---|
| ▶ | 3.9% | (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) |
Compiled 188 to 56 computations (70.2% saved)
| 1× | egg-herbie |
Found 4 expressions of interest:
| New | Metric | Score | Program |
|---|---|---|---|
| ✓ | cost-diff | 5824 | (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)) |
| ✓ | cost-diff | 6144 | (pow.f64 a #s(literal 2 binary64)) |
| ✓ | cost-diff | 6144 | (pow.f64 b #s(literal 2 binary64)) |
| ✓ | cost-diff | 7296 | (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64)))) |
| 8 544× | lower-*.f32 |
| 8 512× | lower-*.f64 |
| 2 766× | lower-fma.f64 |
| 2 766× | lower-fma.f32 |
| 2 102× | lower-/.f32 |
Useful iterations: 0 (0.0ms)
| Iter | Nodes | Cost |
|---|---|---|
| 0 | 56 | 1613 |
| 0 | 104 | 1613 |
| 1 | 187 | 1600 |
| 2 | 622 | 1598 |
| 3 | 5592 | 1586 |
| 0 | 8429 | 1556 |
| 1× | iter limit |
| 1× | node limit |
| 1× | iter limit |
| Inputs |
|---|
(/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) |
(neg.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64)))))))) |
(sqrt.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))))) |
(*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64)))))) |
(*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) |
(*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) |
#s(literal 2 binary64) |
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))) |
(*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) |
#s(literal 4 binary64) |
(*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))) |
(*.f64 b a) |
b |
a |
(*.f64 b (neg.f64 a)) |
(neg.f64 a) |
(pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)) |
(*.f64 x-scale y-scale) |
x-scale |
y-scale |
(+.f64 (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) |
(+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) |
(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) |
(/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) |
(+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) |
(pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) |
(*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) |
(sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) |
(*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)) |
(/.f64 angle #s(literal 180 binary64)) |
angle |
#s(literal 180 binary64) |
(PI.f64) |
(pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) |
(*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) |
(cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) |
(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) |
(/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) |
(+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) |
(pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) |
(*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) |
(pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) |
(*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) |
(sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64)))) |
(+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))) |
(pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) |
(-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) |
(pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64)) |
(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) |
(/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) |
(*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) |
(*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) |
(*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) |
(-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) |
(pow.f64 b #s(literal 2 binary64)) |
(pow.f64 a #s(literal 2 binary64)) |
| Outputs |
|---|
(/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) |
(*.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 (sqrt.f64 (/.f64 (*.f64 (*.f64 #s(literal 8 binary64) (*.f64 (*.f64 b (*.f64 a (*.f64 b a))) (*.f64 b (*.f64 a (*.f64 b a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 angle (/.f64 (PI.f64) #s(literal 180 binary64))))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 angle (/.f64 (PI.f64) #s(literal 180 binary64))))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (/.f64 (PI.f64) #s(literal 180 binary64))))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (/.f64 (PI.f64) #s(literal 180 binary64))))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 angle (/.f64 (PI.f64) #s(literal 180 binary64))))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 angle (/.f64 (PI.f64) #s(literal 180 binary64))))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (/.f64 (PI.f64) #s(literal 180 binary64))))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (/.f64 (PI.f64) #s(literal 180 binary64))))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (*.f64 (sin.f64 (*.f64 angle (/.f64 (PI.f64) #s(literal 180 binary64)))) (/.f64 (cos.f64 (*.f64 angle (/.f64 (PI.f64) #s(literal 180 binary64)))) (*.f64 x-scale y-scale)))))))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))) (*.f64 (*.f64 b a) (*.f64 #s(literal 4 binary64) (*.f64 b a))))) |
(neg.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64)))))))) |
(neg.f64 (sqrt.f64 (/.f64 (*.f64 (*.f64 #s(literal 8 binary64) (*.f64 (*.f64 b (*.f64 a (*.f64 b a))) (*.f64 b (*.f64 a (*.f64 b a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 angle (/.f64 (PI.f64) #s(literal 180 binary64))))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 angle (/.f64 (PI.f64) #s(literal 180 binary64))))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (/.f64 (PI.f64) #s(literal 180 binary64))))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (/.f64 (PI.f64) #s(literal 180 binary64))))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 angle (/.f64 (PI.f64) #s(literal 180 binary64))))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 angle (/.f64 (PI.f64) #s(literal 180 binary64))))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (/.f64 (PI.f64) #s(literal 180 binary64))))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (/.f64 (PI.f64) #s(literal 180 binary64))))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (*.f64 (sin.f64 (*.f64 angle (/.f64 (PI.f64) #s(literal 180 binary64)))) (/.f64 (cos.f64 (*.f64 angle (/.f64 (PI.f64) #s(literal 180 binary64)))) (*.f64 x-scale y-scale)))))))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))) |
(sqrt.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))))) |
(sqrt.f64 (/.f64 (*.f64 (*.f64 #s(literal 8 binary64) (*.f64 (*.f64 b (*.f64 a (*.f64 b a))) (*.f64 b (*.f64 a (*.f64 b a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 angle (/.f64 (PI.f64) #s(literal 180 binary64))))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 angle (/.f64 (PI.f64) #s(literal 180 binary64))))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (/.f64 (PI.f64) #s(literal 180 binary64))))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (/.f64 (PI.f64) #s(literal 180 binary64))))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 angle (/.f64 (PI.f64) #s(literal 180 binary64))))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 angle (/.f64 (PI.f64) #s(literal 180 binary64))))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (/.f64 (PI.f64) #s(literal 180 binary64))))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (/.f64 (PI.f64) #s(literal 180 binary64))))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (*.f64 (sin.f64 (*.f64 angle (/.f64 (PI.f64) #s(literal 180 binary64)))) (/.f64 (cos.f64 (*.f64 angle (/.f64 (PI.f64) #s(literal 180 binary64)))) (*.f64 x-scale y-scale)))))))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))) |
(*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64)))))) |
(/.f64 (*.f64 (*.f64 #s(literal 8 binary64) (*.f64 (*.f64 b (*.f64 a (*.f64 b a))) (*.f64 b (*.f64 a (*.f64 b a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 angle (/.f64 (PI.f64) #s(literal 180 binary64))))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 angle (/.f64 (PI.f64) #s(literal 180 binary64))))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (/.f64 (PI.f64) #s(literal 180 binary64))))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (/.f64 (PI.f64) #s(literal 180 binary64))))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 angle (/.f64 (PI.f64) #s(literal 180 binary64))))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 angle (/.f64 (PI.f64) #s(literal 180 binary64))))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (/.f64 (PI.f64) #s(literal 180 binary64))))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (/.f64 (PI.f64) #s(literal 180 binary64))))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (*.f64 (sin.f64 (*.f64 angle (/.f64 (PI.f64) #s(literal 180 binary64)))) (/.f64 (cos.f64 (*.f64 angle (/.f64 (PI.f64) #s(literal 180 binary64)))) (*.f64 x-scale y-scale)))))))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) |
(*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) |
(/.f64 (*.f64 #s(literal 8 binary64) (*.f64 (*.f64 b (*.f64 a (*.f64 b a))) (*.f64 b (*.f64 a (*.f64 b a))))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) |
(*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) |
(/.f64 (*.f64 #s(literal -8 binary64) (*.f64 b (*.f64 a (*.f64 b a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) |
#s(literal 2 binary64) |
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))) |
(/.f64 (*.f64 a (*.f64 b (*.f64 (*.f64 b a) #s(literal -4 binary64)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) |
(*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) |
(*.f64 a (*.f64 b (*.f64 (*.f64 b a) #s(literal -4 binary64)))) |
#s(literal 4 binary64) |
(*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))) |
(*.f64 b a) |
b |
a |
(*.f64 b (neg.f64 a)) |
(neg.f64 a) |
(pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)) |
(*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) |
(*.f64 x-scale y-scale) |
x-scale |
y-scale |
(+.f64 (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) |
(+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 angle (/.f64 (PI.f64) #s(literal 180 binary64))))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 angle (/.f64 (PI.f64) #s(literal 180 binary64))))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (/.f64 (PI.f64) #s(literal 180 binary64))))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (/.f64 (PI.f64) #s(literal 180 binary64))))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 angle (/.f64 (PI.f64) #s(literal 180 binary64))))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 angle (/.f64 (PI.f64) #s(literal 180 binary64))))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (/.f64 (PI.f64) #s(literal 180 binary64))))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (/.f64 (PI.f64) #s(literal 180 binary64))))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (*.f64 (sin.f64 (*.f64 angle (/.f64 (PI.f64) #s(literal 180 binary64)))) (/.f64 (cos.f64 (*.f64 angle (/.f64 (PI.f64) #s(literal 180 binary64)))) (*.f64 x-scale y-scale))))))) |
(+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) |
(+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 angle (/.f64 (PI.f64) #s(literal 180 binary64))))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 angle (/.f64 (PI.f64) #s(literal 180 binary64))))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (/.f64 (PI.f64) #s(literal 180 binary64))))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (/.f64 (PI.f64) #s(literal 180 binary64))))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) |
(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) |
(/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 angle (/.f64 (PI.f64) #s(literal 180 binary64))))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 angle (/.f64 (PI.f64) #s(literal 180 binary64))))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) |
(/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) |
(/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 angle (/.f64 (PI.f64) #s(literal 180 binary64))))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 angle (/.f64 (PI.f64) #s(literal 180 binary64))))) #s(literal 2 binary64))) x-scale) |
(+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) |
(+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 angle (/.f64 (PI.f64) #s(literal 180 binary64))))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 angle (/.f64 (PI.f64) #s(literal 180 binary64))))) #s(literal 2 binary64))) |
(pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) |
(pow.f64 (*.f64 a (sin.f64 (*.f64 angle (/.f64 (PI.f64) #s(literal 180 binary64))))) #s(literal 2 binary64)) |
(*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) |
(*.f64 a (sin.f64 (*.f64 angle (/.f64 (PI.f64) #s(literal 180 binary64))))) |
(sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) |
(sin.f64 (*.f64 angle (/.f64 (PI.f64) #s(literal 180 binary64)))) |
(*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)) |
(*.f64 angle (/.f64 (PI.f64) #s(literal 180 binary64))) |
(/.f64 angle #s(literal 180 binary64)) |
angle |
#s(literal 180 binary64) |
(PI.f64) |
(pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) |
(pow.f64 (*.f64 b (cos.f64 (*.f64 angle (/.f64 (PI.f64) #s(literal 180 binary64))))) #s(literal 2 binary64)) |
(*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) |
(*.f64 b (cos.f64 (*.f64 angle (/.f64 (PI.f64) #s(literal 180 binary64))))) |
(cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) |
(cos.f64 (*.f64 angle (/.f64 (PI.f64) #s(literal 180 binary64)))) |
(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) |
(/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (/.f64 (PI.f64) #s(literal 180 binary64))))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (/.f64 (PI.f64) #s(literal 180 binary64))))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) |
(/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) |
(/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (/.f64 (PI.f64) #s(literal 180 binary64))))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (/.f64 (PI.f64) #s(literal 180 binary64))))) #s(literal 2 binary64))) y-scale) |
(+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) |
(+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (/.f64 (PI.f64) #s(literal 180 binary64))))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (/.f64 (PI.f64) #s(literal 180 binary64))))) #s(literal 2 binary64))) |
(pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) |
(pow.f64 (*.f64 a (cos.f64 (*.f64 angle (/.f64 (PI.f64) #s(literal 180 binary64))))) #s(literal 2 binary64)) |
(*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) |
(*.f64 a (cos.f64 (*.f64 angle (/.f64 (PI.f64) #s(literal 180 binary64))))) |
(pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) |
(pow.f64 (*.f64 b (sin.f64 (*.f64 angle (/.f64 (PI.f64) #s(literal 180 binary64))))) #s(literal 2 binary64)) |
(*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) |
(*.f64 b (sin.f64 (*.f64 angle (/.f64 (PI.f64) #s(literal 180 binary64))))) |
(sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64)))) |
(hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 angle (/.f64 (PI.f64) #s(literal 180 binary64))))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 angle (/.f64 (PI.f64) #s(literal 180 binary64))))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (/.f64 (PI.f64) #s(literal 180 binary64))))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (/.f64 (PI.f64) #s(literal 180 binary64))))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (*.f64 (sin.f64 (*.f64 angle (/.f64 (PI.f64) #s(literal 180 binary64)))) (/.f64 (cos.f64 (*.f64 angle (/.f64 (PI.f64) #s(literal 180 binary64)))) (*.f64 x-scale y-scale))))) |
(+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))) |
(+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 angle (/.f64 (PI.f64) #s(literal 180 binary64))))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 angle (/.f64 (PI.f64) #s(literal 180 binary64))))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (/.f64 (PI.f64) #s(literal 180 binary64))))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (/.f64 (PI.f64) #s(literal 180 binary64))))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (*.f64 (sin.f64 (*.f64 angle (/.f64 (PI.f64) #s(literal 180 binary64)))) (/.f64 (cos.f64 (*.f64 angle (/.f64 (PI.f64) #s(literal 180 binary64)))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64))) |
(pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) |
(pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 angle (/.f64 (PI.f64) #s(literal 180 binary64))))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 angle (/.f64 (PI.f64) #s(literal 180 binary64))))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (/.f64 (PI.f64) #s(literal 180 binary64))))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (/.f64 (PI.f64) #s(literal 180 binary64))))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) |
(-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) |
(-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 angle (/.f64 (PI.f64) #s(literal 180 binary64))))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 angle (/.f64 (PI.f64) #s(literal 180 binary64))))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (/.f64 (PI.f64) #s(literal 180 binary64))))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (/.f64 (PI.f64) #s(literal 180 binary64))))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) |
(pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64)) |
(pow.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (*.f64 (sin.f64 (*.f64 angle (/.f64 (PI.f64) #s(literal 180 binary64)))) (/.f64 (cos.f64 (*.f64 angle (/.f64 (PI.f64) #s(literal 180 binary64)))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64)) |
(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) |
(*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (*.f64 (sin.f64 (*.f64 angle (/.f64 (PI.f64) #s(literal 180 binary64)))) (/.f64 (cos.f64 (*.f64 angle (/.f64 (PI.f64) #s(literal 180 binary64)))) (*.f64 x-scale y-scale)))) |
(/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) |
(/.f64 (*.f64 (cos.f64 (*.f64 angle (/.f64 (PI.f64) #s(literal 180 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (sin.f64 (*.f64 angle (/.f64 (PI.f64) #s(literal 180 binary64)))) (*.f64 (+.f64 b a) (-.f64 b a))))) x-scale) |
(*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) |
(*.f64 (cos.f64 (*.f64 angle (/.f64 (PI.f64) #s(literal 180 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (sin.f64 (*.f64 angle (/.f64 (PI.f64) #s(literal 180 binary64)))) (*.f64 (+.f64 b a) (-.f64 b a))))) |
(*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) |
(*.f64 #s(literal 2 binary64) (*.f64 (sin.f64 (*.f64 angle (/.f64 (PI.f64) #s(literal 180 binary64)))) (*.f64 (+.f64 b a) (-.f64 b a)))) |
(*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) |
(*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) |
(-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) |
(*.f64 (+.f64 b a) (-.f64 b a)) |
(pow.f64 b #s(literal 2 binary64)) |
(*.f64 b b) |
(pow.f64 a #s(literal 2 binary64)) |
(*.f64 a a) |
Found 4 expressions of interest:
| New | Metric | Score | Program |
|---|---|---|---|
| ✓ | accuracy | 69.9% | (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) |
| ✓ | accuracy | 69.6% | (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) |
| ✓ | accuracy | 67.1% | (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))) |
| ✓ | accuracy | 44.4% | (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) |
| 141.0ms | 77× | 1 | valid |
| 78.0ms | 178× | 0 | valid |
| 7.0ms | 1× | 5 | exit |
Compiled 1 615 to 58 computations (96.4% saved)
ival-sin: 35.0ms (18.2% of total)ival-pow2: 32.0ms (16.6% of total)ival-mult: 31.0ms (16.1% of total)ival-cos: 31.0ms (16.1% of total)adjust: 18.0ms (9.4% of total)ival-div: 18.0ms (9.4% of total)ival-sqrt: 8.0ms (4.2% of total)ival-add: 7.0ms (3.6% of total)ival-sub: 6.0ms (3.1% of total)ival-neg: 4.0ms (2.1% of total)ival-pi: 1.0ms (0.5% of total)exact: 0.0ms (0% of total)ival-true: 0.0ms (0% of total)ival-assert: 0.0ms (0% of total)| Inputs |
|---|
#<alt (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))> |
#<alt (pow.f64 b #s(literal 2 binary64))> |
#<alt (pow.f64 a #s(literal 2 binary64))> |
#<alt (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))> |
#<alt (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))))> |
#<alt (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))> |
#<alt (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))> |
#<alt (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))> |
| Outputs |
|---|
#<alt (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))> |
#<alt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* 1/2 (* (* (pow a 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))> |
#<alt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* (pow a 2) (+ (* 1/2 (* (* (pow a 2) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))))> |
#<alt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* (pow a 2) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow a 2) (+ (* -1/4 (* (* (pow a 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))))))> |
#<alt (* (pow a 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))> |
#<alt (* (pow a 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))> |
#<alt (* (pow a 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow a 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))> |
#<alt (* (pow a 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* -1/4 (* (/ (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (pow a 6)) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow a 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))))> |
#<alt (* (pow a 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))> |
#<alt (* (pow a 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))> |
#<alt (* (pow a 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow a 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))> |
#<alt (* (pow a 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* -1/4 (* (/ (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (pow a 6)) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow a 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))))> |
#<alt (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))> |
#<alt (- (+ (* 1/2 (/ (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (pow b 2) (pow x-scale 2))) (/ (pow a 2) (pow y-scale 2)))> |
#<alt (- (+ (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))) (/ (pow b 2) (pow x-scale 2))) (/ (pow a 2) (pow y-scale 2)))> |
#<alt (- (+ (* (pow angle 2) (+ (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (/ (pow b 2) (pow x-scale 2))) (/ (pow a 2) (pow y-scale 2)))> |
#<alt (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)))> |
#<alt (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)))> |
#<alt (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)))> |
#<alt (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)))> |
#<alt (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)))> |
#<alt (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)))> |
#<alt (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)))> |
#<alt (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)))> |
#<alt (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))> |
#<alt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* 1/2 (* (* (pow b 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))> |
#<alt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* (pow b 2) (+ (* 1/2 (* (* (pow b 2) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))))> |
#<alt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* (pow b 2) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow b 2) (+ (* -1/4 (* (* (pow b 2) (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))))))> |
#<alt (* (pow b 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))> |
#<alt (* (pow b 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))> |
#<alt (* (pow b 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow b 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))> |
#<alt (* (pow b 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* -1/4 (* (/ (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (pow b 6)) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow b 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))))> |
#<alt (* (pow b 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))> |
#<alt (* (pow b 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))> |
#<alt (* (pow b 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow b 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))> |
#<alt (* (pow b 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* -1/4 (* (/ (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (pow b 6)) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow b 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))))> |
#<alt (/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))> |
#<alt (/ (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))> |
#<alt (/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (+ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))) (pow x-scale 2))> |
#<alt (/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (+ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))))) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))) (pow x-scale 2))> |
#<alt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))> |
#<alt (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))> |
#<alt (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (* (pow x-scale 4) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))> |
#<alt (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 6) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (* (pow x-scale 4) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))> |
#<alt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))> |
#<alt (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))> |
#<alt (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (* (pow x-scale 4) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))> |
#<alt (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 6) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (* (pow x-scale 4) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))> |
#<alt (/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))> |
#<alt (/ (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))> |
#<alt (/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (+ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow y-scale 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (pow y-scale 2))> |
#<alt (/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (+ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow y-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))) (pow y-scale 2))> |
#<alt (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))> |
#<alt (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))> |
#<alt (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (* (pow y-scale 4) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))> |
#<alt (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 6) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (* (pow y-scale 4) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))> |
#<alt (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))> |
#<alt (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))> |
#<alt (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (* (pow y-scale 4) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))> |
#<alt (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 6) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (* (pow y-scale 4) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))> |
#<alt (pow b 2)> |
#<alt (pow b 2)> |
#<alt (pow b 2)> |
#<alt (pow b 2)> |
#<alt (pow b 2)> |
#<alt (pow b 2)> |
#<alt (pow b 2)> |
#<alt (pow b 2)> |
#<alt (pow b 2)> |
#<alt (pow b 2)> |
#<alt (pow b 2)> |
#<alt (pow b 2)> |
#<alt (pow a 2)> |
#<alt (pow a 2)> |
#<alt (pow a 2)> |
#<alt (pow a 2)> |
#<alt (pow a 2)> |
#<alt (pow a 2)> |
#<alt (pow a 2)> |
#<alt (pow a 2)> |
#<alt (pow a 2)> |
#<alt (pow a 2)> |
#<alt (pow a 2)> |
#<alt (pow a 2)> |
#<alt (* (pow x-scale 2) (pow y-scale 2))> |
#<alt (* (pow x-scale 2) (pow y-scale 2))> |
#<alt (* (pow x-scale 2) (pow y-scale 2))> |
#<alt (* (pow x-scale 2) (pow y-scale 2))> |
#<alt (* (pow x-scale 2) (pow y-scale 2))> |
#<alt (* (pow x-scale 2) (pow y-scale 2))> |
#<alt (* (pow x-scale 2) (pow y-scale 2))> |
#<alt (* (pow x-scale 2) (pow y-scale 2))> |
#<alt (* (pow x-scale 2) (pow y-scale 2))> |
#<alt (* (pow x-scale 2) (pow y-scale 2))> |
#<alt (* (pow x-scale 2) (pow y-scale 2))> |
#<alt (* (pow x-scale 2) (pow y-scale 2))> |
#<alt (* (pow x-scale 2) (pow y-scale 2))> |
#<alt (* (pow x-scale 2) (pow y-scale 2))> |
#<alt (* (pow x-scale 2) (pow y-scale 2))> |
#<alt (* (pow x-scale 2) (pow y-scale 2))> |
#<alt (* (pow x-scale 2) (pow y-scale 2))> |
#<alt (* (pow x-scale 2) (pow y-scale 2))> |
#<alt (* (pow x-scale 2) (pow y-scale 2))> |
#<alt (* (pow x-scale 2) (pow y-scale 2))> |
#<alt (* (pow x-scale 2) (pow y-scale 2))> |
#<alt (* (pow x-scale 2) (pow y-scale 2))> |
#<alt (* (pow x-scale 2) (pow y-scale 2))> |
#<alt (* (pow x-scale 2) (pow y-scale 2))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))> |
#<alt (+ (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))> |
#<alt (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))))> |
#<alt (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))))))> |
#<alt (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))> |
#<alt (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))> |
#<alt (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))))> |
#<alt (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))))> |
#<alt (* -1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))> |
#<alt (* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))))> |
#<alt (* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))))> |
#<alt (* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))> |
#<alt (+ (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))> |
#<alt (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))))> |
#<alt (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))))))> |
#<alt (* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))> |
#<alt (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))> |
#<alt (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))> |
#<alt (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))))> |
#<alt (* -1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))> |
#<alt (* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))> |
#<alt (* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))))> |
#<alt (* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))))> |
#<alt (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))> |
#<alt (+ (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))> |
#<alt (+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))))> |
#<alt (+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))> |
#<alt (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))> |
#<alt (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))> |
#<alt (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))))> |
#<alt (* -1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))> |
#<alt (* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))> |
#<alt (* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))))> |
#<alt (* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))))> |
#<alt (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))> |
#<alt (+ (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))> |
#<alt (+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))))> |
#<alt (+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))> |
#<alt (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))> |
#<alt (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))> |
#<alt (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))))> |
#<alt (* -1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))> |
#<alt (* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))> |
#<alt (* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))))> |
#<alt (* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))))> |
#<alt (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))> |
#<alt (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))))))) (* b (sqrt 2)))) (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))))> |
#<alt (+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))))) (* b (sqrt 2)))))))> |
#<alt (+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))))) (* b (sqrt 2)))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))))) (* 1/2 (/ (* (pow x-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2)))))))) (* b (sqrt 2)))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))> |
#<alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt 1> |
#<alt (+ 1 (* -1/64800 (* (pow angle 2) (pow (PI) 2))))> |
#<alt (+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* 1/25194240000 (* (pow angle 2) (pow (PI) 4))))))> |
#<alt (+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/24488801280000000 (* (pow angle 2) (pow (PI) 6))) (* 1/25194240000 (pow (PI) 4)))))))> |
#<alt (cos (* 1/180 (* angle (PI))))> |
#<alt (cos (* 1/180 (* angle (PI))))> |
#<alt (cos (* 1/180 (* angle (PI))))> |
#<alt (cos (* 1/180 (* angle (PI))))> |
#<alt (cos (* 1/180 (* angle (PI))))> |
#<alt (cos (* 1/180 (* angle (PI))))> |
#<alt (cos (* 1/180 (* angle (PI))))> |
#<alt (cos (* 1/180 (* angle (PI))))> |
#<alt (* 1/180 (* angle (PI)))> |
#<alt (* angle (+ (* -1/34992000 (* (pow angle 2) (pow (PI) 3))) (* 1/180 (PI))))> |
#<alt (* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* 1/22674816000000 (* (pow angle 2) (pow (PI) 5)))))))> |
#<alt (* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* (pow angle 2) (+ (* -1/30855889612800000000 (* (pow angle 2) (pow (PI) 7))) (* 1/22674816000000 (pow (PI) 5))))))))> |
#<alt (sin (* 1/180 (* angle (PI))))> |
#<alt (sin (* 1/180 (* angle (PI))))> |
#<alt (sin (* 1/180 (* angle (PI))))> |
#<alt (sin (* 1/180 (* angle (PI))))> |
#<alt (sin (* 1/180 (* angle (PI))))> |
#<alt (sin (* 1/180 (* angle (PI))))> |
#<alt (sin (* 1/180 (* angle (PI))))> |
#<alt (sin (* 1/180 (* angle (PI))))> |
60 calls:
| Time | Variable | Point | Expression | |
|---|---|---|---|---|
| 18.0ms | b | @ | inf | (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) |
| 13.0ms | angle | @ | inf | (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) |
| 11.0ms | y-scale | @ | 0 | (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) |
| 10.0ms | angle | @ | 0 | (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) |
| 9.0ms | angle | @ | 0 | (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) |
| 1× | egg-herbie |
| 8 490× | lower-*.f64 |
| 8 490× | lower-*.f32 |
| 6 282× | lower-fma.f64 |
| 6 282× | lower-fma.f32 |
| 5 058× | lower-+.f64 |
Useful iterations: 0 (0.0ms)
| Iter | Nodes | Cost |
|---|---|---|
| 0 | 1006 | 65616 |
| 1 | 3348 | 62172 |
| 0 | 8158 | 60621 |
| 1× | iter limit |
| 1× | node limit |
| Inputs |
|---|
(sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) |
(+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* 1/2 (* (* (pow a 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) |
(+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* (pow a 2) (+ (* 1/2 (* (* (pow a 2) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))) |
(+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* (pow a 2) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow a 2) (+ (* -1/4 (* (* (pow a 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))))))) |
(* (pow a 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) |
(* (pow a 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) |
(* (pow a 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow a 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))) |
(* (pow a 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* -1/4 (* (/ (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (pow a 6)) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow a 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))) |
(* (pow a 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) |
(* (pow a 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) |
(* (pow a 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow a 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))) |
(* (pow a 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* -1/4 (* (/ (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (pow a 6)) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow a 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))) |
(- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) |
(- (+ (* 1/2 (/ (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (pow b 2) (pow x-scale 2))) (/ (pow a 2) (pow y-scale 2))) |
(- (+ (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))) (/ (pow b 2) (pow x-scale 2))) (/ (pow a 2) (pow y-scale 2))) |
(- (+ (* (pow angle 2) (+ (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (/ (pow b 2) (pow x-scale 2))) (/ (pow a 2) (pow y-scale 2))) |
(sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) |
(sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) |
(sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) |
(sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) |
(sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) |
(sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) |
(sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) |
(sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) |
(sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) |
(+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* 1/2 (* (* (pow b 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) |
(+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* (pow b 2) (+ (* 1/2 (* (* (pow b 2) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))) |
(+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* (pow b 2) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow b 2) (+ (* -1/4 (* (* (pow b 2) (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))))))) |
(* (pow b 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) |
(* (pow b 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) |
(* (pow b 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow b 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))) |
(* (pow b 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* -1/4 (* (/ (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (pow b 6)) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow b 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))) |
(* (pow b 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) |
(* (pow b 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) |
(* (pow b 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow b 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))) |
(* (pow b 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* -1/4 (* (/ (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (pow b 6)) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow b 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))) |
(/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)) |
(/ (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)) |
(/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (+ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))) (pow x-scale 2)) |
(/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (+ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))))) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))) (pow x-scale 2)) |
(+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) |
(+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) |
(+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (* (pow x-scale 4) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) |
(+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 6) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (* (pow x-scale 4) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) |
(+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) |
(+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) |
(+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (* (pow x-scale 4) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) |
(+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 6) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (* (pow x-scale 4) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) |
(/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)) |
(/ (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)) |
(/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (+ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow y-scale 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (pow y-scale 2)) |
(/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (+ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow y-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))) (pow y-scale 2)) |
(+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) |
(+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) |
(+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (* (pow y-scale 4) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) |
(+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 6) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (* (pow y-scale 4) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) |
(+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) |
(+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) |
(+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (* (pow y-scale 4) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) |
(+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 6) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (* (pow y-scale 4) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) |
(pow b 2) |
(pow b 2) |
(pow b 2) |
(pow b 2) |
(pow b 2) |
(pow b 2) |
(pow b 2) |
(pow b 2) |
(pow b 2) |
(pow b 2) |
(pow b 2) |
(pow b 2) |
(pow a 2) |
(pow a 2) |
(pow a 2) |
(pow a 2) |
(pow a 2) |
(pow a 2) |
(pow a 2) |
(pow a 2) |
(pow a 2) |
(pow a 2) |
(pow a 2) |
(pow a 2) |
(* (pow x-scale 2) (pow y-scale 2)) |
(* (pow x-scale 2) (pow y-scale 2)) |
(* (pow x-scale 2) (pow y-scale 2)) |
(* (pow x-scale 2) (pow y-scale 2)) |
(* (pow x-scale 2) (pow y-scale 2)) |
(* (pow x-scale 2) (pow y-scale 2)) |
(* (pow x-scale 2) (pow y-scale 2)) |
(* (pow x-scale 2) (pow y-scale 2)) |
(* (pow x-scale 2) (pow y-scale 2)) |
(* (pow x-scale 2) (pow y-scale 2)) |
(* (pow x-scale 2) (pow y-scale 2)) |
(* (pow x-scale 2) (pow y-scale 2)) |
(* (pow x-scale 2) (pow y-scale 2)) |
(* (pow x-scale 2) (pow y-scale 2)) |
(* (pow x-scale 2) (pow y-scale 2)) |
(* (pow x-scale 2) (pow y-scale 2)) |
(* (pow x-scale 2) (pow y-scale 2)) |
(* (pow x-scale 2) (pow y-scale 2)) |
(* (pow x-scale 2) (pow y-scale 2)) |
(* (pow x-scale 2) (pow y-scale 2)) |
(* (pow x-scale 2) (pow y-scale 2)) |
(* (pow x-scale 2) (pow y-scale 2)) |
(* (pow x-scale 2) (pow y-scale 2)) |
(* (pow x-scale 2) (pow y-scale 2)) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(+ (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))))) |
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) |
(* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))) |
(* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) |
(* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))))) |
(* -1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) |
(* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) |
(* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))))) |
(* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(+ (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))))) |
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) |
(* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) |
(* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) |
(* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))) |
(* -1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) |
(* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) |
(* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))) |
(* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))))) |
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) |
(+ (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) |
(+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))) |
(+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) |
(* -1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) |
(* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) |
(* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))))) |
(* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) |
(+ (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) |
(+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))) |
(+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) |
(* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) |
(* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) |
(* -1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) |
(* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) |
(* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))))) |
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) |
(+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))))))) (* b (sqrt 2)))) (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))) |
(+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))))) (* b (sqrt 2))))))) |
(+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))))) (* b (sqrt 2)))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))))) (* 1/2 (/ (* (pow x-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2)))))))) (* b (sqrt 2))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
1 |
(+ 1 (* -1/64800 (* (pow angle 2) (pow (PI) 2)))) |
(+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* 1/25194240000 (* (pow angle 2) (pow (PI) 4)))))) |
(+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/24488801280000000 (* (pow angle 2) (pow (PI) 6))) (* 1/25194240000 (pow (PI) 4))))))) |
(cos (* 1/180 (* angle (PI)))) |
(cos (* 1/180 (* angle (PI)))) |
(cos (* 1/180 (* angle (PI)))) |
(cos (* 1/180 (* angle (PI)))) |
(cos (* 1/180 (* angle (PI)))) |
(cos (* 1/180 (* angle (PI)))) |
(cos (* 1/180 (* angle (PI)))) |
(cos (* 1/180 (* angle (PI)))) |
(* 1/180 (* angle (PI))) |
(* angle (+ (* -1/34992000 (* (pow angle 2) (pow (PI) 3))) (* 1/180 (PI)))) |
(* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* 1/22674816000000 (* (pow angle 2) (pow (PI) 5))))))) |
(* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* (pow angle 2) (+ (* -1/30855889612800000000 (* (pow angle 2) (pow (PI) 7))) (* 1/22674816000000 (pow (PI) 5)))))))) |
(sin (* 1/180 (* angle (PI)))) |
(sin (* 1/180 (* angle (PI)))) |
(sin (* 1/180 (* angle (PI)))) |
(sin (* 1/180 (* angle (PI)))) |
(sin (* 1/180 (* angle (PI)))) |
(sin (* 1/180 (* angle (PI)))) |
(sin (* 1/180 (* angle (PI)))) |
(sin (* 1/180 (* angle (PI)))) |
| Outputs |
|---|
(sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) |
(sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) |
(+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* 1/2 (* (* (pow a 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) |
(fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))) |
(+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* (pow a 2) (+ (* 1/2 (* (* (pow a 2) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))) |
(fma.f64 (*.f64 a a) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 (/.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) #s(literal -1/4 binary64))) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))) |
(+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* (pow a 2) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow a 2) (+ (* -1/4 (* (* (pow a 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))))))) |
(fma.f64 (*.f64 a a) (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 (/.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) #s(literal -1/4 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 3 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 (/.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) #s(literal -1/4 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))) |
(* (pow a 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) |
(*.f64 (*.f64 a a) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) |
(* (pow a 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) |
(*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 a a)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) |
(* (pow a 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow a 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))) |
(*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 a a)) (/.f64 (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (pow.f64 a #s(literal 4 binary64))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) |
(* (pow a 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* -1/4 (* (/ (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (pow a 6)) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow a 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))) |
(*.f64 (*.f64 a a) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 a a)) (/.f64 (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (pow.f64 a #s(literal 4 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (pow.f64 a #s(literal 6 binary64))))))) |
(* (pow a 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) |
(*.f64 (*.f64 a a) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) |
(* (pow a 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) |
(*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 a a)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) |
(* (pow a 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow a 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))) |
(*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 a a)) (/.f64 (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (pow.f64 a #s(literal 4 binary64))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) |
(* (pow a 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* -1/4 (* (/ (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (pow a 6)) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow a 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))) |
(*.f64 (*.f64 a a) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 a a)) (/.f64 (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (pow.f64 a #s(literal 4 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (pow.f64 a #s(literal 6 binary64))))))) |
(- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) |
(-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) |
(- (+ (* 1/2 (/ (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (pow b 2) (pow x-scale 2))) (/ (pow a 2) (pow y-scale 2))) |
(fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))) (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) |
(- (+ (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))) (/ (pow b 2) (pow x-scale 2))) (/ (pow a 2) (pow y-scale 2))) |
(fma.f64 (*.f64 angle angle) (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 angle angle) (/.f64 (+.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 (*.f64 b b) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale))))) (fma.f64 (*.f64 a a) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal -1/787320000 binary64)) (pow.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))) (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))) (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) |
(- (+ (* (pow angle 2) (+ (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (/ (pow b 2) (pow x-scale 2))) (/ (pow a 2) (pow y-scale 2))) |
(fma.f64 (*.f64 angle angle) (fma.f64 (*.f64 angle angle) (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 angle angle) (/.f64 (+.f64 (fma.f64 #s(literal 2 binary64) (fma.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (fma.f64 (*.f64 b b) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale))))) (fma.f64 (*.f64 a a) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))))) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 (*.f64 b b) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (*.f64 x-scale x-scale))) (fma.f64 (*.f64 b b) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))) (*.f64 y-scale y-scale)))))) (*.f64 #s(literal 4 binary64) (fma.f64 #s(literal 1/102036672000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (*.f64 (/.f64 (*.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))) (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (+.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 (*.f64 b b) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale))))) (fma.f64 (*.f64 a a) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal -1/787320000 binary64)) (pow.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))) (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) #s(literal -1/2 binary64))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (+.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 (*.f64 b b) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale))))) (fma.f64 (*.f64 a a) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal -1/787320000 binary64)) (pow.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))) (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))) (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) |
(sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) |
(sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) |
(sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) |
(sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) |
(sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) |
(sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) |
(sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) |
(sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) |
(sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) |
(sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) |
(sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) |
(sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) |
(sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) |
(sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) |
(sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) |
(sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) |
(sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) |
(sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 a #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) |
(+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* 1/2 (* (* (pow b 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) |
(fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 b b) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 a #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 a #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))) |
(+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* (pow b 2) (+ (* 1/2 (* (* (pow b 2) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))) |
(fma.f64 (*.f64 b b) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 a #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 a #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))))) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 a #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))) |
(+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* (pow b 2) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow b 2) (+ (* -1/4 (* (* (pow b 2) (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))))))) |
(fma.f64 (*.f64 b b) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 a #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 a #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 3 binary64))))) (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 a #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 a #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 a #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 a #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))) |
(* (pow b 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) |
(*.f64 (*.f64 b b) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) |
(* (pow b 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) |
(*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 b b)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) |
(* (pow b 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow b 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))) |
(*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 b b)) (/.f64 (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 a #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (pow.f64 b #s(literal 4 binary64))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) |
(* (pow b 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* -1/4 (* (/ (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (pow b 6)) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow b 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))) |
(*.f64 (*.f64 b b) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 b b)) (/.f64 (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 a #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (pow.f64 b #s(literal 4 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 a #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (pow.f64 b #s(literal 6 binary64))))))) |
(* (pow b 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) |
(*.f64 (*.f64 b b) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) |
(* (pow b 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) |
(*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 b b)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) |
(* (pow b 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow b 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))) |
(*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 b b)) (/.f64 (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 a #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (pow.f64 b #s(literal 4 binary64))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) |
(* (pow b 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* -1/4 (* (/ (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (pow b 6)) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow b 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))) |
(*.f64 (*.f64 b b) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 b b)) (/.f64 (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 a #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (pow.f64 b #s(literal 4 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 a #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (pow.f64 b #s(literal 6 binary64))))))) |
(/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)) |
(/.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a))) (*.f64 x-scale x-scale)) |
(/ (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)) |
(/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))) (*.f64 x-scale x-scale)) |
(/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (+ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))) (pow x-scale 2)) |
(/.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (fma.f64 (*.f64 x-scale x-scale) (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 x-scale x-scale) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 2 binary64))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))))) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)))) (*.f64 x-scale x-scale)) |
(/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (+ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))))) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))) (pow x-scale 2)) |
(/.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (fma.f64 (*.f64 x-scale x-scale) (fma.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 2 binary64)))))) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 3 binary64))) (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 2 binary64)))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a))))) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)))) (*.f64 x-scale x-scale)) |
(+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) |
(fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) |
(+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) |
(fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale)))) |
(+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (* (pow x-scale 4) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) |
(fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))))) (/.f64 (+.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) (pow.f64 x-scale #s(literal 4 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale)))) |
(+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 6) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (* (pow x-scale 4) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) |
(fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale))) (+.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))))) (/.f64 (+.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) (pow.f64 x-scale #s(literal 4 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))))) |
(+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) |
(fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) |
(+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) |
(fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale)))) |
(+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (* (pow x-scale 4) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) |
(fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))))) (/.f64 (+.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) (pow.f64 x-scale #s(literal 4 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale)))) |
(+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 6) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (* (pow x-scale 4) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) |
(fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale))) (+.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))))) (/.f64 (+.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) (pow.f64 x-scale #s(literal 4 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))))) |
(/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)) |
(/.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b))) (*.f64 y-scale y-scale)) |
(/ (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)) |
(/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 x-scale x-scale)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)))) (*.f64 y-scale y-scale)) |
(/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (+ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow y-scale 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (pow y-scale 2)) |
(/.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (fma.f64 (*.f64 y-scale y-scale) (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 y-scale y-scale) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b))) #s(literal 2 binary64))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)))) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 x-scale x-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)))))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)))) (*.f64 y-scale y-scale)) |
(/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (+ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow y-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))) (pow y-scale 2)) |
(/.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (fma.f64 (*.f64 y-scale y-scale) (fma.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 x-scale x-scale)))) (+.f64 (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b))) #s(literal 2 binary64)))))) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b))) #s(literal 3 binary64))) (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b))) #s(literal 2 binary64)))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 x-scale x-scale)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b))))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)))) (*.f64 y-scale y-scale)) |
(+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) |
(fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))) |
(+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) |
(fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 y-scale y-scale) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale)))) |
(+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (* (pow y-scale 4) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) |
(fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 y-scale y-scale) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))))) (/.f64 (+.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))) (pow.f64 y-scale #s(literal 4 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale)))) |
(+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 6) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (* (pow y-scale 4) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) |
(fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 x-scale x-scale))) (+.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 y-scale y-scale) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))))) (/.f64 (+.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))) (pow.f64 y-scale #s(literal 4 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))))) |
(+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) |
(fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))) |
(+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) |
(fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 y-scale y-scale) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale)))) |
(+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (* (pow y-scale 4) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) |
(fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 y-scale y-scale) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))))) (/.f64 (+.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))) (pow.f64 y-scale #s(literal 4 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale)))) |
(+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 6) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (* (pow y-scale 4) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) |
(fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 x-scale x-scale))) (+.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 y-scale y-scale) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))))) (/.f64 (+.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))) (pow.f64 y-scale #s(literal 4 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))))) |
(pow b 2) |
(*.f64 b b) |
(pow b 2) |
(*.f64 b b) |
(pow b 2) |
(*.f64 b b) |
(pow b 2) |
(*.f64 b b) |
(pow b 2) |
(*.f64 b b) |
(pow b 2) |
(*.f64 b b) |
(pow b 2) |
(*.f64 b b) |
(pow b 2) |
(*.f64 b b) |
(pow b 2) |
(*.f64 b b) |
(pow b 2) |
(*.f64 b b) |
(pow b 2) |
(*.f64 b b) |
(pow b 2) |
(*.f64 b b) |
(pow a 2) |
(*.f64 a a) |
(pow a 2) |
(*.f64 a a) |
(pow a 2) |
(*.f64 a a) |
(pow a 2) |
(*.f64 a a) |
(pow a 2) |
(*.f64 a a) |
(pow a 2) |
(*.f64 a a) |
(pow a 2) |
(*.f64 a a) |
(pow a 2) |
(*.f64 a a) |
(pow a 2) |
(*.f64 a a) |
(pow a 2) |
(*.f64 a a) |
(pow a 2) |
(*.f64 a a) |
(pow a 2) |
(*.f64 a a) |
(* (pow x-scale 2) (pow y-scale 2)) |
(*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) |
(* (pow x-scale 2) (pow y-scale 2)) |
(*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) |
(* (pow x-scale 2) (pow y-scale 2)) |
(*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) |
(* (pow x-scale 2) (pow y-scale 2)) |
(*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) |
(* (pow x-scale 2) (pow y-scale 2)) |
(*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) |
(* (pow x-scale 2) (pow y-scale 2)) |
(*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) |
(* (pow x-scale 2) (pow y-scale 2)) |
(*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) |
(* (pow x-scale 2) (pow y-scale 2)) |
(*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) |
(* (pow x-scale 2) (pow y-scale 2)) |
(*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) |
(* (pow x-scale 2) (pow y-scale 2)) |
(*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) |
(* (pow x-scale 2) (pow y-scale 2)) |
(*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) |
(* (pow x-scale 2) (pow y-scale 2)) |
(*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) |
(* (pow x-scale 2) (pow y-scale 2)) |
(*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) |
(* (pow x-scale 2) (pow y-scale 2)) |
(*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) |
(* (pow x-scale 2) (pow y-scale 2)) |
(*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) |
(* (pow x-scale 2) (pow y-scale 2)) |
(*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) |
(* (pow x-scale 2) (pow y-scale 2)) |
(*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) |
(* (pow x-scale 2) (pow y-scale 2)) |
(*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) |
(* (pow x-scale 2) (pow y-scale 2)) |
(*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) |
(* (pow x-scale 2) (pow y-scale 2)) |
(*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) |
(* (pow x-scale 2) (pow y-scale 2)) |
(*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) |
(* (pow x-scale 2) (pow y-scale 2)) |
(*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) |
(* (pow x-scale 2) (pow y-scale 2)) |
(*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) |
(* (pow x-scale 2) (pow y-scale 2)) |
(*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (fma.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 a #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))))) |
(+ (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) |
(fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (*.f64 (*.f64 b b) x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 a #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 a #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (fma.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 a #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) |
(fma.f64 (*.f64 b b) (*.f64 #s(literal 1/8 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 a #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))))) (fma.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 a #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 (*.f64 b b) x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 a #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 a #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 a #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (fma.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 a #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))))))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (fma.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 a #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))))) |
(fma.f64 (*.f64 b b) (fma.f64 (*.f64 b b) (*.f64 #s(literal 1/8 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 a #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))))) (fma.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 a #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 a #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 a #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (fma.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 a #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))))))) (*.f64 (*.f64 (*.f64 b b) x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 a #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 a #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (*.f64 (/.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 a #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 a #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 a #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 a #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (fma.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 a #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))))))) (fma.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 a #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))))) #s(literal -1/2 binary64)))))))) (*.f64 #s(literal 1/8 binary64) (*.f64 x-scale (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 a #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 a #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (fma.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 a #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))))))) |
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) |
(* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))) |
(*.f64 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (*.f64 b b)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))))) |
(* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) |
(*.f64 b (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (*.f64 b b)) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 a #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))))) (pow.f64 b #s(literal 4 binary64))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))))) |
(* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))))) |
(*.f64 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (*.f64 b b)) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 a #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (*.f64 (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 a #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal -1/2 binary64))))) (pow.f64 b #s(literal 6 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 a #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))))) (pow.f64 b #s(literal 4 binary64))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))))) |
(* -1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) |
(*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 b x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) |
(* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) |
(*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (*.f64 b b)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (neg.f64 b)) |
(* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))))) |
(neg.f64 (*.f64 b (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (*.f64 b b)) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 a #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))))) (pow.f64 b #s(literal 4 binary64))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))))) |
(* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))))) |
(*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (*.f64 b b)) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 a #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (*.f64 (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 a #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal -1/2 binary64))))) (pow.f64 b #s(literal 6 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 a #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))))) (pow.f64 b #s(literal 4 binary64))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))))) (neg.f64 b)) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (fma.f64 (*.f64 b b) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))))) |
(+ (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) |
(fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (*.f64 (*.f64 a a) x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 b b) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (fma.f64 (*.f64 b b) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) |
(fma.f64 (*.f64 a a) (*.f64 #s(literal 1/8 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 b b) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))))) (fma.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 (*.f64 a a) x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 (/.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) #s(literal -1/4 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (fma.f64 (*.f64 b b) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))))))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (fma.f64 (*.f64 b b) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))))) |
(fma.f64 (*.f64 a a) (fma.f64 (*.f64 a a) (*.f64 #s(literal 1/8 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 b b) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))))) (fma.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 (/.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) #s(literal -1/4 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (fma.f64 (*.f64 b b) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))))))) (*.f64 (*.f64 (*.f64 a a) x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 (/.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) #s(literal -1/4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (*.f64 (/.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 (/.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) #s(literal -1/4 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (fma.f64 (*.f64 b b) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))))))) (fma.f64 (*.f64 b b) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))))) #s(literal -1/2 binary64)))))))) (*.f64 #s(literal 1/8 binary64) (*.f64 x-scale (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 b b) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (fma.f64 (*.f64 b b) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))))))) |
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) |
(* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) |
(*.f64 a (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 (*.f64 b b) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (*.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))))) (*.f64 a a)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))))) |
(* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) |
(*.f64 a (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 (*.f64 b b) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (*.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))))) (*.f64 a a)) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 b b) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (*.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))))) (pow.f64 a #s(literal 4 binary64))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))))) |
(* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))) |
(*.f64 a (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 (*.f64 b b) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (*.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))))) (*.f64 a a)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (*.f64 (/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (*.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 b b) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (*.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal -1/2 binary64))))) (pow.f64 a #s(literal 6 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 b b) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (*.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))))) (pow.f64 a #s(literal 4 binary64))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))))) |
(* -1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) |
(*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 a x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) |
(* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) |
(*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 (*.f64 b b) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (*.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))))) (*.f64 a a)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (neg.f64 a)) |
(* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))) |
(*.f64 (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 (*.f64 b b) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (*.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))))) (*.f64 a a)) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 b b) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (*.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))))) (pow.f64 a #s(literal 4 binary64))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (neg.f64 a)) |
(* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))))) |
(neg.f64 (*.f64 a (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 (*.f64 b b) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (*.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))))) (*.f64 a a)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (*.f64 (/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (*.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 b b) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (*.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal -1/2 binary64))))) (pow.f64 a #s(literal 6 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 b b) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (*.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))))) (pow.f64 a #s(literal 4 binary64))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))))))) |
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))))) |
(+ (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) |
(fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a))))))) |
(+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))) |
(fma.f64 (*.f64 x-scale x-scale) (*.f64 #s(literal 1/8 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))))) (fma.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 2 binary64)))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a))))))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a))))))) |
(+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))))) |
(fma.f64 (*.f64 x-scale x-scale) (fma.f64 (*.f64 x-scale x-scale) (*.f64 #s(literal 1/8 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))))) (fma.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 2 binary64)))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (-.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale))) (+.f64 (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 2 binary64))))))) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 3 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 2 binary64)))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a))))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a))))))))))) (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a))))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale)))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))))))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale)))))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) |
(*.f64 x-scale (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale)))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))) #s(literal 2 binary64)) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))))))) (pow.f64 x-scale #s(literal 4 binary64))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale)))))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) |
(*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))))))) (*.f64 x-scale x-scale)) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale)))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (-.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale))) (+.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) #s(literal 3 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))) (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))) #s(literal 2 binary64)) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))))))) (pow.f64 x-scale #s(literal 6 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))) #s(literal 2 binary64)) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))))))) (pow.f64 x-scale #s(literal 4 binary64))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))))))))) |
(* -1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale)))))) |
(* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) |
(*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))))))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))))))) (neg.f64 x-scale)) |
(* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) |
(neg.f64 (*.f64 x-scale (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale)))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))) #s(literal 2 binary64)) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))))))) (pow.f64 x-scale #s(literal 4 binary64))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))))))))) |
(* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))))) |
(*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))))))) (*.f64 x-scale x-scale)) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale)))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (-.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale))) (+.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) #s(literal 3 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))) (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))) #s(literal 2 binary64)) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))))))) (pow.f64 x-scale #s(literal 6 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))) #s(literal 2 binary64)) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))))))) (pow.f64 x-scale #s(literal 4 binary64))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale)))))))) (neg.f64 x-scale)) |
(* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)))))) |
(+ (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) |
(fma.f64 #s(literal 1/8 binary64) (*.f64 x-scale (*.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 x-scale x-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b))))))) |
(+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))) |
(fma.f64 (*.f64 y-scale y-scale) (*.f64 #s(literal 1/8 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)))))) (fma.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 x-scale x-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))))) (*.f64 x-scale (*.f64 (*.f64 (*.f64 y-scale y-scale) (sqrt.f64 #s(literal 8 binary64))) (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b))) #s(literal 2 binary64)))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 x-scale x-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b))))))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b))))))) |
(+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))))) |
(fma.f64 (*.f64 y-scale y-scale) (fma.f64 (*.f64 y-scale y-scale) (*.f64 #s(literal 1/8 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)))))) (fma.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b))) #s(literal 2 binary64)))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 x-scale x-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b))))))) (*.f64 x-scale (*.f64 (*.f64 (*.f64 y-scale y-scale) (sqrt.f64 #s(literal 8 binary64))) (-.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 x-scale x-scale))) (+.f64 (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b))) #s(literal 2 binary64))))))) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b))) #s(literal 3 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 x-scale x-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale)))) (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b))) #s(literal 2 binary64)))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 x-scale x-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b))))))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b))))))))))) (*.f64 #s(literal 1/8 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)))))) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 x-scale x-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale)))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale)))))) |
(* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) |
(*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 x-scale x-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))))))) (*.f64 y-scale y-scale)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale)))))))) |
(* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) |
(*.f64 y-scale (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale)))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 x-scale x-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))) #s(literal 2 binary64)))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 x-scale x-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)))) #s(literal 2 binary64)) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))))))) (pow.f64 y-scale #s(literal 4 binary64))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale)))))))) |
(* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) |
(*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 x-scale x-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))))))) (*.f64 y-scale y-scale)) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale)))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (-.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 x-scale x-scale))) (+.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))))) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))) #s(literal 3 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 x-scale x-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)))) (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))) #s(literal 2 binary64)))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 x-scale x-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)))) #s(literal 2 binary64)) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))))))) (pow.f64 y-scale #s(literal 6 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))) #s(literal 2 binary64)))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 x-scale x-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)))) #s(literal 2 binary64)) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))))))) (pow.f64 y-scale #s(literal 4 binary64))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))))))))) |
(* -1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale)))))) |
(* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) |
(*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 x-scale x-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))))))) (*.f64 y-scale y-scale)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))))))) (neg.f64 y-scale)) |
(* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) |
(neg.f64 (*.f64 y-scale (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale)))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 x-scale x-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))) #s(literal 2 binary64)))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 x-scale x-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)))) #s(literal 2 binary64)) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))))))) (pow.f64 y-scale #s(literal 4 binary64))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))))))))) |
(* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))))) |
(neg.f64 (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 x-scale x-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))))))) (*.f64 y-scale y-scale)) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale)))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (-.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 x-scale x-scale))) (+.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))))) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))) #s(literal 3 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 x-scale x-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)))) (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))) #s(literal 2 binary64)))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 x-scale x-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)))) #s(literal 2 binary64)) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))))))) (pow.f64 y-scale #s(literal 6 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))) #s(literal 2 binary64)))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 x-scale x-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)))) #s(literal 2 binary64)) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))))))) (pow.f64 y-scale #s(literal 4 binary64))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale)))))))))) |
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) |
(+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))))))) (* b (sqrt 2)))) (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))) |
(fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 angle angle) (*.f64 x-scale x-scale)) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/32400 binary64) (fma.f64 (*.f64 a a) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/32400 binary64) (fma.f64 (*.f64 a a) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))) (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (*.f64 b (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))) |
(+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))))) (* b (sqrt 2))))))) |
(fma.f64 (*.f64 angle angle) (*.f64 #s(literal 1/8 binary64) (fma.f64 (*.f64 angle angle) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 (*.f64 b b) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale))))) (fma.f64 (*.f64 a a) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal -1/787320000 binary64)) (pow.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))) (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 b b) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (fma.f64 (*.f64 a a) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/32400 binary64) (fma.f64 (*.f64 a a) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))) (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64))) (*.f64 b b)))))) (*.f64 b (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/32400 binary64) (fma.f64 (*.f64 a a) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/32400 binary64) (fma.f64 (*.f64 a a) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))) (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (*.f64 b (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))) |
(+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))))) (* b (sqrt 2)))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))))) (* 1/2 (/ (* (pow x-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2)))))))) (* b (sqrt 2))))))))) |
(fma.f64 (*.f64 angle angle) (fma.f64 (*.f64 angle angle) (*.f64 #s(literal 1/8 binary64) (fma.f64 (*.f64 angle angle) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fma.f64 #s(literal 2 binary64) (fma.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (fma.f64 (*.f64 b b) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale))))) (fma.f64 (*.f64 a a) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))))) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 (*.f64 b b) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (*.f64 x-scale x-scale))) (fma.f64 (*.f64 b b) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))) (*.f64 y-scale y-scale)))))) (*.f64 #s(literal 4 binary64) (fma.f64 #s(literal 1/102036672000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (*.f64 (/.f64 (*.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))) (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (+.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 (*.f64 b b) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale))))) (fma.f64 (*.f64 a a) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal -1/787320000 binary64)) (pow.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))) (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) #s(literal -1/2 binary64))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (+.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (+.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (*.f64 y-scale y-scale)))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -1/32400 binary64) (fma.f64 (*.f64 a a) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/32400 binary64) (fma.f64 (*.f64 a a) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))) (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 (*.f64 b b) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale))))) (fma.f64 (*.f64 a a) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal -1/787320000 binary64)) (pow.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))) (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 b b) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (fma.f64 (*.f64 a a) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/32400 binary64) (fma.f64 (*.f64 a a) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))) (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64))) (*.f64 b b))))) (*.f64 b b)))))) (*.f64 b (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 (*.f64 b b) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale))))) (fma.f64 (*.f64 a a) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal -1/787320000 binary64)) (pow.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))) (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 b b) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (fma.f64 (*.f64 a a) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/32400 binary64) (fma.f64 (*.f64 a a) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))) (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64))) (*.f64 b b)))))) (*.f64 b (sqrt.f64 #s(literal 2 binary64)))))) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/32400 binary64) (fma.f64 (*.f64 a a) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/32400 binary64) (fma.f64 (*.f64 a a) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))) (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))))) (*.f64 b (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (*.f64 (*.f64 b b) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (*.f64 (*.f64 b b) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (*.f64 (*.f64 b b) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (*.f64 (*.f64 b b) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (*.f64 (*.f64 b b) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (*.f64 (*.f64 b b) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (*.f64 (*.f64 b b) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (*.f64 (*.f64 b b) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 a a) (/.f64 (*.f64 b b) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) |
1 |
#s(literal 1 binary64) |
(+ 1 (* -1/64800 (* (pow angle 2) (pow (PI) 2)))) |
(fma.f64 (*.f64 #s(literal -1/64800 binary64) (*.f64 angle angle)) (*.f64 (PI.f64) (PI.f64)) #s(literal 1 binary64)) |
(+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* 1/25194240000 (* (pow angle 2) (pow (PI) 4)))))) |
(fma.f64 (*.f64 angle angle) (fma.f64 (*.f64 #s(literal 1/25194240000 binary64) (*.f64 angle angle)) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal -1/64800 binary64))) #s(literal 1 binary64)) |
(+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/24488801280000000 (* (pow angle 2) (pow (PI) 6))) (* 1/25194240000 (pow (PI) 4))))))) |
(fma.f64 (*.f64 angle angle) (fma.f64 (*.f64 angle angle) (fma.f64 (*.f64 #s(literal -1/24488801280000000 binary64) (*.f64 angle angle)) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/25194240000 binary64))) (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal -1/64800 binary64))) #s(literal 1 binary64)) |
(cos (* 1/180 (* angle (PI)))) |
(cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
(cos (* 1/180 (* angle (PI)))) |
(cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
(cos (* 1/180 (* angle (PI)))) |
(cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
(cos (* 1/180 (* angle (PI)))) |
(cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
(cos (* 1/180 (* angle (PI)))) |
(cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
(cos (* 1/180 (* angle (PI)))) |
(cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
(cos (* 1/180 (* angle (PI)))) |
(cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
(cos (* 1/180 (* angle (PI)))) |
(cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
(* 1/180 (* angle (PI))) |
(*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) |
(* angle (+ (* -1/34992000 (* (pow angle 2) (pow (PI) 3))) (* 1/180 (PI)))) |
(*.f64 angle (fma.f64 (*.f64 #s(literal -1/34992000 binary64) (*.f64 angle angle)) (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/180 binary64) (PI.f64)))) |
(* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* 1/22674816000000 (* (pow angle 2) (pow (PI) 5))))))) |
(*.f64 angle (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/34992000 binary64) (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 angle angle)) (pow.f64 (PI.f64) #s(literal 5 binary64)))) (*.f64 #s(literal 1/180 binary64) (PI.f64)))) |
(* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* (pow angle 2) (+ (* -1/30855889612800000000 (* (pow angle 2) (pow (PI) 7))) (* 1/22674816000000 (pow (PI) 5)))))))) |
(*.f64 angle (fma.f64 (*.f64 angle angle) (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/22674816000000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (*.f64 #s(literal -1/30855889612800000000 binary64) (*.f64 angle angle)) (pow.f64 (PI.f64) #s(literal 7 binary64)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))))) (*.f64 #s(literal 1/180 binary64) (PI.f64)))) |
(sin (* 1/180 (* angle (PI)))) |
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
(sin (* 1/180 (* angle (PI)))) |
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
(sin (* 1/180 (* angle (PI)))) |
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
(sin (* 1/180 (* angle (PI)))) |
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
(sin (* 1/180 (* angle (PI)))) |
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
(sin (* 1/180 (* angle (PI)))) |
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
(sin (* 1/180 (* angle (PI)))) |
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
(sin (* 1/180 (* angle (PI)))) |
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
| 1× | batch-egg-rewrite |
| 4 164× | lower-*.f32 |
| 4 132× | lower-*.f64 |
| 2 628× | lower-pow.f32 |
| 2 610× | lower-pow.f64 |
| 2 580× | lower-/.f32 |
Useful iterations: 0 (0.0ms)
| Iter | Nodes | Cost |
|---|---|---|
| 0 | 56 | 306 |
| 0 | 104 | 306 |
| 1 | 403 | 295 |
| 2 | 3385 | 281 |
| 0 | 8190 | 269 |
| 1× | iter limit |
| 1× | node limit |
| 1× | iter limit |
| Inputs |
|---|
(sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64)))) |
(pow.f64 b #s(literal 2 binary64)) |
(pow.f64 a #s(literal 2 binary64)) |
(pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)) |
(/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) |
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))) |
(cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) |
(sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) |
| Outputs |
|---|
(exp.f64 (log.f64 (hypot.f64 (-.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale))))) |
(hypot.f64 (-.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale))) |
(hypot.f64 (-.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))) x-scale) (neg.f64 y-scale))) |
(hypot.f64 (-.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale))) (/.f64 (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))) x-scale)) y-scale)) |
(hypot.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)) (-.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale)))) |
(hypot.f64 (/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))) x-scale) (neg.f64 y-scale)) (-.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale)))) |
(hypot.f64 (/.f64 (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))) x-scale)) y-scale) (-.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale)))) |
(fabs.f64 (hypot.f64 (-.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)))) |
(sqrt.f64 (pow.f64 (hypot.f64 (-.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale))) #s(literal 2 binary64))) |
(/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale))) #s(literal 4 binary64)) (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)) #s(literal 4 binary64)) (pow.f64 (*.f64 (-.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (pow.f64 (-.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale))) #s(literal 6 binary64)) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)) #s(literal 6 binary64)))))) |
(/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))) (-.f64 (pow.f64 (-.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale))) #s(literal 4 binary64)) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)) #s(literal 4 binary64)))))) |
(/.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale))) #s(literal 6 binary64)) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)) #s(literal 6 binary64)))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale))) #s(literal 4 binary64)) (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)) #s(literal 4 binary64)) (pow.f64 (*.f64 (-.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale))) #s(literal 2 binary64)))))) |
(/.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale))) #s(literal 6 binary64)) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)) #s(literal 6 binary64)))) (sqrt.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)) #s(literal 4 binary64)) (-.f64 (pow.f64 (-.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale))) #s(literal 4 binary64)) (pow.f64 (*.f64 (-.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale))) #s(literal 2 binary64)))))) |
(/.f64 (sqrt.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale))) #s(literal 4 binary64)) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)) #s(literal 4 binary64)))) (sqrt.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))))) |
(/.f64 (sqrt.f64 (neg.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale))) #s(literal 6 binary64)) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)) #s(literal 6 binary64))))) (sqrt.f64 (neg.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale))) #s(literal 4 binary64)) (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)) #s(literal 4 binary64)) (pow.f64 (*.f64 (-.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale))) #s(literal 2 binary64))))))) |
(/.f64 (sqrt.f64 (neg.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale))) #s(literal 4 binary64)) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)) #s(literal 4 binary64))))) (sqrt.f64 (neg.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))))) |
(/.f64 (sqrt.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)) #s(literal 4 binary64)) (pow.f64 (-.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale))) #s(literal 4 binary64)))) (sqrt.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) |
(pow.f64 (pow.f64 (hypot.f64 (-.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale))) #s(literal 2 binary64)) #s(literal 1/2 binary64)) |
(pow.f64 (hypot.f64 (-.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale))) #s(literal 1 binary64)) |
(pow.f64 (pow.f64 (hypot.f64 (-.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale))) #s(literal 4 binary64)) #s(literal 1/4 binary64)) |
(pow.f64 (pow.f64 (hypot.f64 (-.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) |
(*.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale))) #s(literal 6 binary64)) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)) #s(literal 6 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (-.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale))) #s(literal 4 binary64)) (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)) #s(literal 4 binary64)) (pow.f64 (*.f64 (-.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale))) #s(literal 2 binary64))))))) |
(*.f64 (sqrt.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale))) #s(literal 4 binary64)) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)) #s(literal 4 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (-.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))))) |
(*.f64 (pow.f64 (hypot.f64 (-.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale))) #s(literal 1/2 binary64)) (pow.f64 (hypot.f64 (-.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale))) #s(literal 1/2 binary64))) |
(*.f64 (sqrt.f64 (hypot.f64 (-.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)))) (sqrt.f64 (hypot.f64 (-.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale))))) |
(exp.f64 (log.f64 (*.f64 b b))) |
(exp.f64 (*.f64 (log.f64 (*.f64 b b)) #s(literal 1 binary64))) |
(pow.f64 b #s(literal 2 binary64)) |
(pow.f64 (*.f64 b b) #s(literal 1 binary64)) |
(pow.f64 (exp.f64 #s(literal 2 binary64)) (log.f64 b)) |
(*.f64 b b) |
(exp.f64 (*.f64 #s(literal 2 binary64) (log.f64 a))) |
(exp.f64 (*.f64 (*.f64 #s(literal 2 binary64) (log.f64 a)) #s(literal 1 binary64))) |
(pow.f64 a #s(literal 2 binary64)) |
(pow.f64 (*.f64 a a) #s(literal 1 binary64)) |
(pow.f64 (exp.f64 #s(literal 2 binary64)) (log.f64 a)) |
(*.f64 a a) |
(exp.f64 (*.f64 #s(literal 2 binary64) (log.f64 (*.f64 x-scale y-scale)))) |
(exp.f64 (*.f64 (log.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) #s(literal 1 binary64))) |
(exp.f64 (*.f64 (*.f64 #s(literal 2 binary64) (log.f64 (*.f64 x-scale y-scale))) #s(literal 1 binary64))) |
(exp.f64 (fma.f64 (log.f64 x-scale) #s(literal 2 binary64) (*.f64 (log.f64 y-scale) #s(literal 2 binary64)))) |
(exp.f64 (fma.f64 (log.f64 y-scale) #s(literal 2 binary64) (*.f64 (log.f64 x-scale) #s(literal 2 binary64)))) |
(exp.f64 (+.f64 (log.f64 (*.f64 x-scale y-scale)) (log.f64 (*.f64 x-scale y-scale)))) |
(pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)) |
(pow.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) #s(literal 1 binary64)) |
(pow.f64 (exp.f64 #s(literal 2 binary64)) (log.f64 (*.f64 x-scale y-scale))) |
(*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) |
(*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))) |
(*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)) |
(*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) |
(*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) |
(*.f64 (*.f64 (*.f64 x-scale y-scale) y-scale) x-scale) |
(*.f64 (*.f64 (*.f64 x-scale y-scale) x-scale) y-scale) |
(exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 (neg.f64 (*.f64 a b)) (*.f64 #s(literal 4 binary64) (*.f64 a b))) (*.f64 (neg.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))) (*.f64 #s(literal 8 binary64) (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)))))))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))) #s(literal -1 binary64))) |
(-.f64 #s(literal 0 binary64) (*.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))) (*.f64 #s(literal 8 binary64) (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 (neg.f64 (*.f64 a b)) (*.f64 #s(literal 4 binary64) (*.f64 a b)))))) |
(-.f64 (/.f64 #s(literal 0 binary64) (/.f64 (*.f64 (neg.f64 (*.f64 a b)) (*.f64 #s(literal 4 binary64) (*.f64 a b))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))) (*.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))) (*.f64 #s(literal 8 binary64) (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 (neg.f64 (*.f64 a b)) (*.f64 #s(literal 4 binary64) (*.f64 a b)))))) |
(neg.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))) (*.f64 #s(literal 8 binary64) (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 (neg.f64 (*.f64 a b)) (*.f64 #s(literal 4 binary64) (*.f64 a b)))))) |
(/.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))) (*.f64 #s(literal 8 binary64) (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale))))))) (*.f64 #s(literal -4 binary64) (/.f64 (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))) |
(/.f64 (neg.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))) (*.f64 #s(literal 8 binary64) (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)))))))) (/.f64 (*.f64 (neg.f64 (*.f64 a b)) (*.f64 #s(literal 4 binary64) (*.f64 a b))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))) |
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 (*.f64 a b)) (*.f64 #s(literal 4 binary64) (*.f64 a b))) (*.f64 (neg.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))) (*.f64 #s(literal 8 binary64) (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)))))))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))) |
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 (neg.f64 (*.f64 a b)) (*.f64 #s(literal 4 binary64) (*.f64 a b))) (*.f64 (neg.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))) (*.f64 #s(literal 8 binary64) (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)))))))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))) #s(literal 1 binary64))) |
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 (neg.f64 (*.f64 a b)) (*.f64 #s(literal 4 binary64) (*.f64 a b))) (*.f64 (neg.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))) (*.f64 #s(literal 8 binary64) (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)))))))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))))) |
(/.f64 (/.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))) (*.f64 #s(literal 8 binary64) (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale))))))) (*.f64 (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))) #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))) |
(/.f64 (*.f64 (neg.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))) (*.f64 #s(literal 8 binary64) (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)))))))) #s(literal 1 binary64)) (/.f64 (*.f64 (neg.f64 (*.f64 a b)) (*.f64 #s(literal 4 binary64) (*.f64 a b))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))) |
(/.f64 (*.f64 (neg.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))) (*.f64 #s(literal 8 binary64) (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)))))))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (*.f64 (neg.f64 (*.f64 a b)) (*.f64 #s(literal 4 binary64) (*.f64 a b)))) |
(/.f64 (/.f64 (neg.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))) (*.f64 #s(literal 8 binary64) (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)))))))) #s(literal 4 binary64)) (/.f64 (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))) |
(pow.f64 (/.f64 (*.f64 (neg.f64 (*.f64 a b)) (*.f64 #s(literal 4 binary64) (*.f64 a b))) (*.f64 (neg.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))) (*.f64 #s(literal 8 binary64) (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)))))))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))) #s(literal -1 binary64)) |
(pow.f64 (/.f64 (/.f64 (*.f64 (neg.f64 (*.f64 a b)) (*.f64 #s(literal 4 binary64) (*.f64 a b))) (*.f64 (neg.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))) (*.f64 #s(literal 8 binary64) (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)))))))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))) #s(literal 1 binary64)) #s(literal -1 binary64)) |
(*.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))) (*.f64 #s(literal 8 binary64) (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale))))))) (*.f64 (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))) #s(literal -4 binary64)))) |
(*.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))) (*.f64 #s(literal 8 binary64) (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale))))))) (/.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))))) |
(*.f64 (neg.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))) (*.f64 #s(literal 8 binary64) (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 (neg.f64 (*.f64 a b)) (*.f64 #s(literal 4 binary64) (*.f64 a b))))) |
(*.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))) (*.f64 #s(literal 8 binary64) (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale))))))) (*.f64 (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))) #s(literal -4 binary64))))) |
(*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 (neg.f64 (*.f64 a b)) (*.f64 #s(literal 4 binary64) (*.f64 a b)))) (neg.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))) (*.f64 #s(literal 8 binary64) (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale))))))))) |
(*.f64 #s(literal -1 binary64) (*.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))) (*.f64 #s(literal 8 binary64) (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 (neg.f64 (*.f64 a b)) (*.f64 #s(literal 4 binary64) (*.f64 a b)))))) |
(*.f64 (/.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))) (*.f64 #s(literal 8 binary64) (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale))))))) (*.f64 (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))) #s(literal -4 binary64))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) |
(*.f64 #s(literal -1/4 binary64) (/.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))) (*.f64 #s(literal 8 binary64) (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale))))))) (/.f64 (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))) |
(*.f64 (/.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (*.f64 a b)) (*.f64 #s(literal 4 binary64) (*.f64 a b)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))) (*.f64 #s(literal 8 binary64) (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale))))))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))) |
(*.f64 (*.f64 (/.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))) (*.f64 #s(literal 8 binary64) (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale))))))) (*.f64 (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))) #s(literal -4 binary64))) (*.f64 x-scale y-scale)) (*.f64 x-scale y-scale)) |
(*.f64 (*.f64 (/.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))) (*.f64 #s(literal 8 binary64) (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale))))))) (*.f64 (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))) #s(literal -4 binary64))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) |
(*.f64 (/.f64 (neg.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))) (*.f64 #s(literal 8 binary64) (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)))))))) #s(literal 1 binary64)) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 (neg.f64 (*.f64 a b)) (*.f64 #s(literal 4 binary64) (*.f64 a b))))) |
(*.f64 (/.f64 (neg.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))) (*.f64 #s(literal 8 binary64) (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)))))))) (*.f64 (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))) #s(literal -4 binary64))) (neg.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))) |
(exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 (neg.f64 (*.f64 a b)) (*.f64 #s(literal 4 binary64) (*.f64 a b))))) #s(literal -1 binary64))) |
(neg.f64 (*.f64 #s(literal -4 binary64) (/.f64 (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))) |
(/.f64 (*.f64 (neg.f64 (*.f64 a b)) (*.f64 #s(literal 4 binary64) (*.f64 a b))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) |
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 (neg.f64 (*.f64 a b)) (*.f64 #s(literal 4 binary64) (*.f64 a b))))) |
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 (neg.f64 (*.f64 a b)) (*.f64 #s(literal 4 binary64) (*.f64 a b)))) #s(literal 1 binary64))) |
(/.f64 (*.f64 (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))) #s(literal -4 binary64)) (neg.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))) |
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 (neg.f64 (*.f64 a b)) (*.f64 #s(literal 4 binary64) (*.f64 a b)))))) |
(/.f64 (neg.f64 (*.f64 (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))) #s(literal -4 binary64))) (neg.f64 (neg.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))) |
(/.f64 (/.f64 (*.f64 (neg.f64 (*.f64 a b)) (*.f64 #s(literal 4 binary64) (*.f64 a b))) (*.f64 x-scale y-scale)) (*.f64 x-scale y-scale)) |
(/.f64 (*.f64 (*.f64 (neg.f64 (*.f64 a b)) (*.f64 #s(literal 4 binary64) (*.f64 a b))) #s(literal 1 binary64)) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) |
(/.f64 (/.f64 (*.f64 (neg.f64 (*.f64 a b)) (*.f64 #s(literal 4 binary64) (*.f64 a b))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) |
(pow.f64 (/.f64 (*.f64 (neg.f64 (*.f64 a b)) (*.f64 #s(literal 4 binary64) (*.f64 a b))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) #s(literal 1 binary64)) |
(pow.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 (neg.f64 (*.f64 a b)) (*.f64 #s(literal 4 binary64) (*.f64 a b)))) #s(literal -1 binary64)) |
(pow.f64 (/.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 (neg.f64 (*.f64 a b)) (*.f64 #s(literal 4 binary64) (*.f64 a b)))) #s(literal 1 binary64)) #s(literal -1 binary64)) |
(*.f64 #s(literal 4 binary64) (/.f64 (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))) |
(*.f64 (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))) (*.f64 #s(literal 4 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))) |
(*.f64 (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))) (/.f64 #s(literal 4 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))) |
(*.f64 (*.f64 (neg.f64 (*.f64 a b)) (*.f64 #s(literal 4 binary64) (*.f64 a b))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))) |
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 (*.f64 a b)) (*.f64 #s(literal 4 binary64) (*.f64 a b))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))) |
(*.f64 (*.f64 (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))) #s(literal -4 binary64)) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))) |
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (*.f64 (neg.f64 (*.f64 a b)) (*.f64 #s(literal 4 binary64) (*.f64 a b)))) |
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a b)) (*.f64 (neg.f64 (*.f64 a b)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))) |
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a b)) (/.f64 (neg.f64 (*.f64 a b)) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))) |
(*.f64 (/.f64 (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) #s(literal 4 binary64)) |
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 x-scale y-scale)) (/.f64 (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))) (*.f64 x-scale y-scale))) |
(*.f64 (/.f64 (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))) (*.f64 x-scale y-scale)) (/.f64 #s(literal 4 binary64) (*.f64 x-scale y-scale))) |
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 x-scale x-scale)) (/.f64 (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))) (*.f64 y-scale y-scale))) |
(*.f64 (/.f64 (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))) (*.f64 x-scale x-scale)) (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale))) |
(*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a b)) (*.f64 x-scale y-scale)) (/.f64 (neg.f64 (*.f64 a b)) (*.f64 x-scale y-scale))) |
(*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a b)) (*.f64 x-scale x-scale)) (/.f64 (neg.f64 (*.f64 a b)) (*.f64 y-scale y-scale))) |
(exp.f64 (*.f64 (log.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))) #s(literal 1 binary64))) |
(cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) |
(pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 1 binary64)) |
(exp.f64 (*.f64 (log.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))) #s(literal 1 binary64))) |
(sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) |
(pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 1 binary64)) |
Compiled 157 742 to 2 767 computations (98.2% saved)
18 alts after pruning (18 fresh and 0 done)
| Pruned | Kept | Total | |
|---|---|---|---|
| New | 577 | 18 | 595 |
| Fresh | 0 | 0 | 0 |
| Picked | 1 | 0 | 1 |
| Done | 0 | 0 | 0 |
| Total | 578 | 18 | 596 |
| Status | Accuracy | Program |
|---|---|---|
| 5.8% | (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (exp.f64 (log.f64 (hypot.f64 (-.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale))))))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) | |
| ▶ | 2.8% | (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) |
| 2.5% | (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 a a)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) | |
| 1.8% | (*.f64 (/.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))) (*.f64 #s(literal 8 binary64) (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale))))))) (*.f64 (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))) #s(literal -4 binary64))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) | |
| ▶ | 2.6% | (*.f64 (/.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (*.f64 a b)) (*.f64 #s(literal 4 binary64) (*.f64 a b)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))) (*.f64 #s(literal 8 binary64) (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale))))))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))) |
| 2.6% | (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 (neg.f64 (*.f64 a b)) (*.f64 #s(literal 4 binary64) (*.f64 a b))) (*.f64 (neg.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))) (*.f64 #s(literal 8 binary64) (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)))))))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))) #s(literal -1 binary64))) | |
| 16.3% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) | |
| 19.2% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) | |
| ▶ | 42.8% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a))))))) |
| 5.9% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (fma.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 a #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))))))) | |
| 19.2% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))))))) | |
| 16.7% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))))))) | |
| 40.7% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b))))))) | |
| ▶ | 37.4% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))) |
| 4.0% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 x-scale x-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))))))) (*.f64 y-scale y-scale)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))))))))) | |
| ▶ | 3.6% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))))))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))))))))) |
| 7.8% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (*.f64 b b)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))))) | |
| 11.9% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 a (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 (*.f64 b b) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (*.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))))) (*.f64 a a)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))))) |
Compiled 6 142 to 1 722 computations (72% saved)
| 1× | egg-herbie |
Found 20 expressions of interest:
| New | Metric | Score | Program |
|---|---|---|---|
| ✓ | cost-diff | 0 | (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))))))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))))))) |
| ✓ | cost-diff | 0 | (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))))))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale)))))))) |
| ✓ | cost-diff | 0 | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))))))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))))))))) |
| ✓ | cost-diff | 320 | (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))))) |
| ✓ | cost-diff | 128 | (*.f64 (neg.f64 (*.f64 a b)) (*.f64 #s(literal 4 binary64) (*.f64 a b))) |
| ✓ | cost-diff | 192 | (/.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (*.f64 a b)) (*.f64 #s(literal 4 binary64) (*.f64 a b)))) |
| ✓ | cost-diff | 320 | (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) |
| ✓ | cost-diff | 1088 | (/.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))) (*.f64 #s(literal 8 binary64) (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale))))))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))) |
| ✓ | cost-diff | 384 | (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) |
| ✓ | cost-diff | 384 | (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) |
| ✓ | cost-diff | 384 | (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) |
| ✓ | cost-diff | 5824 | (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)) |
| ✓ | cost-diff | 0 | (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))) |
| ✓ | cost-diff | 0 | (*.f64 #s(literal 1/4 binary64) b) |
| ✓ | cost-diff | 0 | (*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) |
| ✓ | cost-diff | 0 | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))) |
| ✓ | cost-diff | 0 | (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) |
| ✓ | cost-diff | 0 | (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) |
| ✓ | cost-diff | 0 | (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))))) |
| ✓ | cost-diff | 0 | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a))))))) |
| 7 768× | lower-*.f32 |
| 7 654× | lower-*.f64 |
| 4 872× | lower-fma.f32 |
| 4 858× | lower-fma.f64 |
| 3 510× | lower-+.f32 |
Useful iterations: 0 (0.0ms)
| Iter | Nodes | Cost |
|---|---|---|
| 0 | 192 | 6248 |
| 0 | 334 | 6218 |
| 1 | 722 | 6012 |
| 2 | 2714 | 5991 |
| 0 | 8054 | 5880 |
| 1× | iter limit |
| 1× | node limit |
| 1× | iter limit |
| Inputs |
|---|
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) |
#s(literal 1/4 binary64) |
(*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) |
y-scale |
(sqrt.f64 #s(literal 8 binary64)) |
#s(literal 8 binary64) |
(sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a))))) |
(*.f64 #s(literal 2 binary64) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))) |
#s(literal 2 binary64) |
(fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a))) |
(pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) |
(cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
(*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) |
#s(literal 1/180 binary64) |
(*.f64 angle (PI.f64)) |
angle |
(PI.f64) |
(*.f64 b b) |
b |
(*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) |
(pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) |
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
(*.f64 a a) |
a |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) |
(*.f64 #s(literal 1/4 binary64) b) |
#s(literal 1/4 binary64) |
b |
(*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))) |
(*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) |
y-scale |
(sqrt.f64 #s(literal 2 binary64)) |
#s(literal 2 binary64) |
(sqrt.f64 #s(literal 8 binary64)) |
#s(literal 8 binary64) |
(/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) |
(neg.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) |
(sqrt.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) |
(*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) |
(*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) |
(*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) |
#s(literal 2 binary64) |
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))) |
(*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) |
#s(literal 4 binary64) |
(*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))) |
(*.f64 b a) |
b |
a |
(*.f64 b (neg.f64 a)) |
(neg.f64 a) |
(pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)) |
(*.f64 x-scale y-scale) |
x-scale |
y-scale |
(+.f64 (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) |
(+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) |
(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) |
(/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) |
(+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) |
(pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) |
(*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) |
(sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) |
(*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)) |
(/.f64 angle #s(literal 180 binary64)) |
angle |
#s(literal 180 binary64) |
(PI.f64) |
(pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) |
(*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) |
(cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) |
(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) |
(/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) |
(+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) |
(pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) |
(*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) |
(pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) |
(*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) |
(-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) |
(/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) |
(*.f64 b b) |
(*.f64 x-scale x-scale) |
(/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) |
(*.f64 a a) |
(*.f64 y-scale y-scale) |
(*.f64 (/.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (*.f64 a b)) (*.f64 #s(literal 4 binary64) (*.f64 a b)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))) (*.f64 #s(literal 8 binary64) (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale))))))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))) |
(/.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (*.f64 a b)) (*.f64 #s(literal 4 binary64) (*.f64 a b)))) |
#s(literal -1 binary64) |
(*.f64 (neg.f64 (*.f64 a b)) (*.f64 #s(literal 4 binary64) (*.f64 a b))) |
(neg.f64 (*.f64 a b)) |
(*.f64 a b) |
a |
b |
(*.f64 #s(literal 4 binary64) (*.f64 a b)) |
#s(literal 4 binary64) |
(/.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))) (*.f64 #s(literal 8 binary64) (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale))))))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))) |
(sqrt.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))) (*.f64 #s(literal 8 binary64) (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale))))))) |
(*.f64 (/.f64 (*.f64 (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))) (*.f64 #s(literal 8 binary64) (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)))))) |
(/.f64 (*.f64 (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))) (*.f64 #s(literal 8 binary64) (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) |
(*.f64 (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))) (*.f64 #s(literal 8 binary64) (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))))) |
(neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))) |
(*.f64 b (*.f64 b (*.f64 a a))) |
(*.f64 b (*.f64 a a)) |
(*.f64 a a) |
(*.f64 #s(literal 8 binary64) (neg.f64 (*.f64 b (*.f64 b (*.f64 a a))))) |
#s(literal 8 binary64) |
(*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) |
x-scale |
(*.f64 y-scale (*.f64 x-scale y-scale)) |
y-scale |
(*.f64 x-scale y-scale) |
(+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale))))) |
(/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) |
(fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) |
(*.f64 b b) |
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) |
#s(literal 1/2 binary64) |
(*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))) |
(cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))) |
(*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) |
#s(literal 2 binary64) |
(*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)) |
(*.f64 angle (PI.f64)) |
angle |
(PI.f64) |
#s(literal 1/180 binary64) |
(*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))))) |
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) |
(*.f64 x-scale x-scale) |
(+.f64 (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)))) |
(/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale)) |
(fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) |
(*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))))) |
(*.f64 y-scale y-scale) |
(hypot.f64 (-.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale))) |
(-.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale))) |
(/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)) |
(*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))) |
(*.f64 (+.f64 b a) (-.f64 b a)) |
(+.f64 b a) |
(-.f64 b a) |
(sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))) |
(/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) |
#s(literal 1 binary64) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))))))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))))))))) |
(*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))))))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale)))))))) |
x-scale |
(fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))))))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))))))) |
#s(literal 1/8 binary64) |
(/.f64 (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))))))) (*.f64 x-scale x-scale)) |
(*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))))))) |
(*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a))))) |
(*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) |
y-scale |
(sqrt.f64 #s(literal 8 binary64)) |
#s(literal 8 binary64) |
(fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))) |
#s(literal 1/2 binary64) |
(/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale)))) |
(fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale))) |
#s(literal -2 binary64) |
(*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))) |
(fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) |
(*.f64 b b) |
b |
(/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) |
(pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) |
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
(*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) |
#s(literal 1/180 binary64) |
(*.f64 angle (PI.f64)) |
angle |
(PI.f64) |
#s(literal 2 binary64) |
(*.f64 y-scale y-scale) |
(/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale)) |
(*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) |
(pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) |
(cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
(*.f64 a a) |
a |
(fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a))) |
(*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) |
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale)) |
(*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) |
#s(literal 4 binary64) |
(*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) |
(*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) |
(*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) |
(*.f64 (+.f64 b a) (-.f64 b a)) |
(+.f64 b a) |
(-.f64 b a) |
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale)))))) |
(/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))))) |
#s(literal 1 binary64) |
(*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale)))) |
(*.f64 x-scale x-scale) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) |
#s(literal 1/4 binary64) |
(sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))))) |
| Outputs |
|---|
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) #s(literal 1/4 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))))) |
(*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) #s(literal 1/4 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) |
(*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) #s(literal 1/4 binary64))) |
#s(literal 1/4 binary64) |
(*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) |
y-scale |
(sqrt.f64 #s(literal 8 binary64)) |
#s(literal 8 binary64) |
(sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a))))) |
(sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b))))) |
(*.f64 #s(literal 2 binary64) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))) |
(*.f64 #s(literal 2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)))) |
#s(literal 2 binary64) |
(fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a))) |
(fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b))) |
(pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) |
(cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
(*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) |
#s(literal 1/180 binary64) |
(*.f64 angle (PI.f64)) |
angle |
(PI.f64) |
(*.f64 b b) |
b |
(*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) |
(pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) |
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
(*.f64 a a) |
a |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b y-scale) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (sqrt.f64 #s(literal 2 binary64)))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b y-scale) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (sqrt.f64 #s(literal 2 binary64))))) |
(*.f64 #s(literal 1/4 binary64) b) |
(*.f64 b #s(literal 1/4 binary64)) |
#s(literal 1/4 binary64) |
b |
(*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))) |
(*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64)))) |
(*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) |
y-scale |
(sqrt.f64 #s(literal 2 binary64)) |
#s(literal 2 binary64) |
(sqrt.f64 #s(literal 8 binary64)) |
#s(literal 8 binary64) |
(/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) |
(neg.f64 (*.f64 (/.f64 (sqrt.f64 (*.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (/.f64 (*.f64 (*.f64 (*.f64 b b) (*.f64 a a)) (*.f64 (*.f64 #s(literal 8 binary64) b) (*.f64 b (*.f64 a a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))) (*.f64 (*.f64 b a) (*.f64 (*.f64 b a) #s(literal -4 binary64)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))) |
(neg.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) |
(neg.f64 (sqrt.f64 (*.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (/.f64 (*.f64 (*.f64 (*.f64 b b) (*.f64 a a)) (*.f64 (*.f64 #s(literal 8 binary64) b) (*.f64 b (*.f64 a a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))))) |
(sqrt.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) |
(sqrt.f64 (*.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (/.f64 (*.f64 (*.f64 (*.f64 b b) (*.f64 a a)) (*.f64 (*.f64 #s(literal 8 binary64) b) (*.f64 b (*.f64 a a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))) |
(*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) |
(*.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (/.f64 (*.f64 (*.f64 (*.f64 b b) (*.f64 a a)) (*.f64 (*.f64 #s(literal 8 binary64) b) (*.f64 b (*.f64 a a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))) |
(*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) |
(/.f64 (*.f64 (*.f64 (*.f64 b b) (*.f64 a a)) (*.f64 (*.f64 #s(literal 8 binary64) b) (*.f64 b (*.f64 a a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) |
(*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) |
(/.f64 (*.f64 (*.f64 (*.f64 b b) (*.f64 a a)) #s(literal -8 binary64)) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) |
#s(literal 2 binary64) |
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))) |
(/.f64 (*.f64 (*.f64 b a) (*.f64 (*.f64 b a) #s(literal -4 binary64))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) |
(*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) |
(*.f64 (*.f64 b a) (*.f64 (*.f64 b a) #s(literal -4 binary64))) |
#s(literal 4 binary64) |
(*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))) |
(neg.f64 (*.f64 a (*.f64 a (*.f64 b b)))) |
(*.f64 b a) |
b |
a |
(*.f64 b (neg.f64 a)) |
(neg.f64 (*.f64 b a)) |
(neg.f64 a) |
(pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)) |
(*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) |
(*.f64 x-scale y-scale) |
x-scale |
y-scale |
(+.f64 (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) |
(+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) |
(+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) |
(+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) |
(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) |
(/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) |
(/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) |
(/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64))) x-scale) |
(+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) |
(+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64))) |
(pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) |
(pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64)) |
(*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) |
(*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) |
(sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) |
(sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64))) |
(*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)) |
(/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)) |
(/.f64 angle #s(literal 180 binary64)) |
angle |
#s(literal 180 binary64) |
(PI.f64) |
(pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) |
(pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64)) |
(*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) |
(*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) |
(cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) |
(cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64))) |
(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) |
(/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) |
(/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) |
(/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64))) y-scale) |
(+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) |
(+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64))) |
(pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) |
(pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64)) |
(*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) |
(*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) |
(pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) |
(pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64)) |
(*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) |
(*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) |
(-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) |
(/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) |
(*.f64 b b) |
(*.f64 x-scale x-scale) |
(/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) |
(*.f64 a a) |
(*.f64 y-scale y-scale) |
(*.f64 (/.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (*.f64 a b)) (*.f64 #s(literal 4 binary64) (*.f64 a b)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))) (*.f64 #s(literal 8 binary64) (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale))))))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))) |
(*.f64 (sqrt.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 b b) (*.f64 a a)) (*.f64 (*.f64 #s(literal 8 binary64) b) (*.f64 b (*.f64 a a)))) (+.f64 (hypot.f64 (-.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale))) (*.f64 (+.f64 b a) (/.f64 (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (*.f64 x-scale y-scale)))) (+.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))) (/.f64 (*.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) #s(literal -1/4 binary64)) (neg.f64 (*.f64 a (*.f64 a (*.f64 b b)))))) |
(/.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (*.f64 a b)) (*.f64 #s(literal 4 binary64) (*.f64 a b)))) |
(/.f64 #s(literal -1/4 binary64) (neg.f64 (*.f64 a (*.f64 a (*.f64 b b))))) |
#s(literal -1 binary64) |
(*.f64 (neg.f64 (*.f64 a b)) (*.f64 #s(literal 4 binary64) (*.f64 a b))) |
(*.f64 (*.f64 b a) (*.f64 (*.f64 b a) #s(literal -4 binary64))) |
(neg.f64 (*.f64 a b)) |
(neg.f64 (*.f64 b a)) |
(*.f64 a b) |
(*.f64 b a) |
a |
b |
(*.f64 #s(literal 4 binary64) (*.f64 a b)) |
(*.f64 #s(literal 4 binary64) (*.f64 b a)) |
#s(literal 4 binary64) |
(/.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))) (*.f64 #s(literal 8 binary64) (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale))))))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))) |
(*.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) (sqrt.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 b b) (*.f64 a a)) (*.f64 (*.f64 #s(literal 8 binary64) b) (*.f64 b (*.f64 a a)))) (+.f64 (hypot.f64 (-.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale))) (*.f64 (+.f64 b a) (/.f64 (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (*.f64 x-scale y-scale)))) (+.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))) |
(sqrt.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))) (*.f64 #s(literal 8 binary64) (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale))))))) |
(sqrt.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 b b) (*.f64 a a)) (*.f64 (*.f64 #s(literal 8 binary64) b) (*.f64 b (*.f64 a a)))) (+.f64 (hypot.f64 (-.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale))) (*.f64 (+.f64 b a) (/.f64 (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (*.f64 x-scale y-scale)))) (+.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))) |
(*.f64 (/.f64 (*.f64 (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))) (*.f64 #s(literal 8 binary64) (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)))))) |
(/.f64 (*.f64 (*.f64 (*.f64 (*.f64 b b) (*.f64 a a)) (*.f64 (*.f64 #s(literal 8 binary64) b) (*.f64 b (*.f64 a a)))) (+.f64 (hypot.f64 (-.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale))) (*.f64 (+.f64 b a) (/.f64 (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (*.f64 x-scale y-scale)))) (+.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) |
(/.f64 (*.f64 (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))) (*.f64 #s(literal 8 binary64) (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) |
(/.f64 (*.f64 (*.f64 (*.f64 b b) (*.f64 a a)) (*.f64 (*.f64 #s(literal 8 binary64) b) (*.f64 b (*.f64 a a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) |
(*.f64 (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))) (*.f64 #s(literal 8 binary64) (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))))) |
(*.f64 (*.f64 (*.f64 b b) (*.f64 a a)) (*.f64 (*.f64 #s(literal 8 binary64) b) (*.f64 b (*.f64 a a)))) |
(neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))) |
(neg.f64 (*.f64 a (*.f64 a (*.f64 b b)))) |
(*.f64 b (*.f64 b (*.f64 a a))) |
(*.f64 (*.f64 b b) (*.f64 a a)) |
(*.f64 b (*.f64 a a)) |
(*.f64 a a) |
(*.f64 #s(literal 8 binary64) (neg.f64 (*.f64 b (*.f64 b (*.f64 a a))))) |
(*.f64 (*.f64 (*.f64 b b) (*.f64 a a)) #s(literal -8 binary64)) |
#s(literal 8 binary64) |
(*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) |
x-scale |
(*.f64 y-scale (*.f64 x-scale y-scale)) |
y-scale |
(*.f64 x-scale y-scale) |
(+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale))))) |
(+.f64 (hypot.f64 (-.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale))) (*.f64 (+.f64 b a) (/.f64 (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (*.f64 x-scale y-scale)))) (+.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale)))) |
(/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) |
(/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale)) |
(fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) |
(fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) |
(*.f64 b b) |
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) |
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) |
#s(literal 1/2 binary64) |
(*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))) |
(*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) |
(cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))) |
(cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) |
(*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) |
(*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)) |
#s(literal 2 binary64) |
(*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)) |
(*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) |
(*.f64 angle (PI.f64)) |
angle |
(PI.f64) |
#s(literal 1/180 binary64) |
(*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))))) |
(*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) |
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) |
(fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) |
(*.f64 x-scale x-scale) |
(+.f64 (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)))) |
(+.f64 (/.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale))) (*.f64 (+.f64 b a) (/.f64 (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (*.f64 x-scale y-scale))))) |
(/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale)) |
(/.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale)) |
(fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) |
(fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) |
(*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))))) |
(*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) |
(*.f64 y-scale y-scale) |
(hypot.f64 (-.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale))) |
(hypot.f64 (-.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale))) (*.f64 (+.f64 b a) (/.f64 (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (*.f64 x-scale y-scale)))) |
(-.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale))) |
(-.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale))) |
(/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)) |
(*.f64 (+.f64 b a) (/.f64 (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (*.f64 x-scale y-scale))) |
(*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))) |
(*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) |
(*.f64 (+.f64 b a) (-.f64 b a)) |
(+.f64 b a) |
(-.f64 b a) |
(sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))) |
(sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) |
(/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) |
#s(literal 1 binary64) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))))))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b))) (*.f64 #s(literal -2 binary64) (fma.f64 b (*.f64 b (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))) (fma.f64 b (*.f64 b (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)))) (sqrt.f64 (/.f64 #s(literal 1/2 binary64) (fma.f64 b (*.f64 b (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) #s(literal 1/4 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 b (*.f64 b (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))))) |
(*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))))))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale)))))))) |
(*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b))) (*.f64 #s(literal -2 binary64) (fma.f64 b (*.f64 b (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))) (fma.f64 b (*.f64 b (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)))) (sqrt.f64 (/.f64 #s(literal 1/2 binary64) (fma.f64 b (*.f64 b (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) #s(literal 1/4 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 b (*.f64 b (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))))) |
x-scale |
(fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))))))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))))))) |
(fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b))) (*.f64 #s(literal -2 binary64) (fma.f64 b (*.f64 b (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))) (fma.f64 b (*.f64 b (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)))) (sqrt.f64 (/.f64 #s(literal 1/2 binary64) (fma.f64 b (*.f64 b (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) #s(literal 1/4 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 b (*.f64 b (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) |
#s(literal 1/8 binary64) |
(/.f64 (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))))))) (*.f64 x-scale x-scale)) |
(/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b))) (*.f64 #s(literal -2 binary64) (fma.f64 b (*.f64 b (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))) (fma.f64 b (*.f64 b (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)))) (sqrt.f64 (/.f64 #s(literal 1/2 binary64) (fma.f64 b (*.f64 b (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (*.f64 x-scale x-scale)) |
(*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))))))) |
(*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b))) (*.f64 #s(literal -2 binary64) (fma.f64 b (*.f64 b (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))) (fma.f64 b (*.f64 b (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)))) (sqrt.f64 (/.f64 #s(literal 1/2 binary64) (fma.f64 b (*.f64 b (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) |
(*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a))))) |
(*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b))) (*.f64 #s(literal -2 binary64) (fma.f64 b (*.f64 b (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))) (fma.f64 b (*.f64 b (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b))))) |
(*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) |
y-scale |
(sqrt.f64 #s(literal 8 binary64)) |
#s(literal 8 binary64) |
(fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))) |
(fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b))) (*.f64 #s(literal -2 binary64) (fma.f64 b (*.f64 b (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))) (fma.f64 b (*.f64 b (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)))) |
#s(literal 1/2 binary64) |
(/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale)))) |
(/.f64 (fma.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b))) (*.f64 #s(literal -2 binary64) (fma.f64 b (*.f64 b (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))) (fma.f64 b (*.f64 b (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) |
(fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale))) |
(fma.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b))) (*.f64 #s(literal -2 binary64) (fma.f64 b (*.f64 b (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))) |
#s(literal -2 binary64) |
(*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))) |
(*.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b))) (fma.f64 b (*.f64 b (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) |
(fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) |
(fma.f64 b (*.f64 b (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) |
(*.f64 b b) |
b |
(/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) |
(pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) |
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
(*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) |
#s(literal 1/180 binary64) |
(*.f64 angle (PI.f64)) |
angle |
(PI.f64) |
#s(literal 2 binary64) |
(*.f64 y-scale y-scale) |
(/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale)) |
(*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) |
(*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) |
(pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) |
(cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
(*.f64 a a) |
a |
(fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a))) |
(fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b))) |
(*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) |
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale)) |
(/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) |
(*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) |
(*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) |
#s(literal 4 binary64) |
(*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) |
(*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a)))))) |
(*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) |
(*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a))))) |
(*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) |
(*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a)))) |
(*.f64 (+.f64 b a) (-.f64 b a)) |
(+.f64 b a) |
(-.f64 b a) |
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale)))))) |
(sqrt.f64 (/.f64 #s(literal 1/2 binary64) (fma.f64 b (*.f64 b (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) |
(/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))))) |
(/.f64 #s(literal 1/2 binary64) (fma.f64 b (*.f64 b (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) |
#s(literal 1 binary64) |
(*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale)))) |
(*.f64 #s(literal 2 binary64) (fma.f64 b (*.f64 b (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) |
(*.f64 x-scale x-scale) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale)))))) |
(*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) #s(literal 1/4 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 b (*.f64 b (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) |
(*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) #s(literal 1/4 binary64))) |
#s(literal 1/4 binary64) |
(sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))))) |
(sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 b (*.f64 b (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) |
Found 20 expressions of interest:
| New | Metric | Score | Program |
|---|---|---|---|
| ✓ | accuracy | 70.3% | (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
| ✓ | accuracy | 69.5% | (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale))) |
| ✓ | accuracy | 65.0% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))))))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))))))))) |
| ✓ | accuracy | 55.5% | (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale)))) |
| ✓ | accuracy | 70.2% | (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))) |
| ✓ | accuracy | 69.9% | (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))) |
| ✓ | accuracy | 66.3% | (/.f64 (*.f64 (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))) (*.f64 #s(literal 8 binary64) (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) |
| ✓ | accuracy | 43.9% | (*.f64 (/.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (*.f64 a b)) (*.f64 #s(literal 4 binary64) (*.f64 a b)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))) (*.f64 #s(literal 8 binary64) (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale))))))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))) |
| ✓ | accuracy | 70.3% | (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) |
| ✓ | accuracy | 67.9% | (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))) |
| ✓ | accuracy | 46.2% | (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) |
| ✓ | accuracy | 42.6% | #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) |
| ✓ | accuracy | 100.0% | (sqrt.f64 #s(literal 2 binary64)) |
| ✓ | accuracy | 99.3% | (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))) |
| ✓ | accuracy | 99.3% | (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) |
| ✓ | accuracy | 40.3% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))) |
| ✓ | accuracy | 70.7% | (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
| ✓ | accuracy | 70.3% | (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
| ✓ | accuracy | 63.3% | (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a))))) |
| ✓ | accuracy | 59.5% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a))))))) |
| 952.0ms | 200× | 1 | valid |
| 92.0ms | 27× | 2 | valid |
| 26.0ms | 21× | 0 | valid |
| 21.0ms | 1× | 5 | exit |
| 10.0ms | 7× | 1 | exit |
Compiled 6 637 to 162 computations (97.6% saved)
ival-mult: 353.0ms (38.6% of total)ival-sin: 119.0ms (13% of total)ival-cos: 103.0ms (11.3% of total)ival-pow2: 79.0ms (8.6% of total)ival-div: 75.0ms (8.2% of total)adjust: 69.0ms (7.5% of total)ival-sqrt: 37.0ms (4% of total)ival-add: 36.0ms (3.9% of total)const: 14.0ms (1.5% of total)ival-sub: 13.0ms (1.4% of total)ival-hypot: 8.0ms (0.9% of total)ival-neg: 5.0ms (0.5% of total)ival-pi: 2.0ms (0.2% of total)exact: 1.0ms (0.1% of total)ival-true: 0.0ms (0% of total)ival-assert: 0.0ms (0% of total)| Inputs |
|---|
#<alt #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))))))> |
#<alt (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a))))))> |
#<alt (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))> |
#<alt (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))> |
#<alt #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))))> |
#<alt (*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))> |
#<alt (*.f64 #s(literal 1/4 binary64) b)> |
#<alt (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))> |
#<alt (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))> |
#<alt (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))))> |
#<alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)> |
#<alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)> |
#<alt (/.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))) (*.f64 #s(literal 8 binary64) (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale))))))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))> |
#<alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))> |
#<alt (/.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (*.f64 a b)) (*.f64 #s(literal 4 binary64) (*.f64 a b))))> |
#<alt (*.f64 (neg.f64 (*.f64 a b)) (*.f64 #s(literal 4 binary64) (*.f64 a b)))> |
#<alt (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale)))))> |
#<alt #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))))))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale)))))))))> |
#<alt (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))))))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))))))))> |
#<alt (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))))))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale)))))))> |
#<alt (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))))> |
#<alt (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))> |
#<alt (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))> |
#<alt (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64)))> |
#<alt (sqrt.f64 #s(literal 2 binary64))> |
#<alt #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))> |
#<alt (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))> |
#<alt (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))> |
#<alt (*.f64 (/.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (*.f64 a b)) (*.f64 #s(literal 4 binary64) (*.f64 a b)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))) (*.f64 #s(literal 8 binary64) (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale))))))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))))> |
#<alt (/.f64 (*.f64 (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))) (*.f64 #s(literal 8 binary64) (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))> |
#<alt (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))> |
#<alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))> |
#<alt (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))))> |
#<alt (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale)))> |
| Outputs |
|---|
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))> |
#<alt (+ (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))> |
#<alt (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))))> |
#<alt (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))))))> |
#<alt (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))> |
#<alt (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))> |
#<alt (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))))> |
#<alt (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))))> |
#<alt (* -1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))> |
#<alt (* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))))> |
#<alt (* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))))> |
#<alt (* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))> |
#<alt (+ (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))> |
#<alt (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))))> |
#<alt (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))))))> |
#<alt (* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))> |
#<alt (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))> |
#<alt (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))> |
#<alt (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))))> |
#<alt (* -1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))> |
#<alt (* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))> |
#<alt (* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))))> |
#<alt (* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))))> |
#<alt (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))> |
#<alt (+ (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))> |
#<alt (+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))))> |
#<alt (+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))> |
#<alt (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))> |
#<alt (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))> |
#<alt (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))))> |
#<alt (* -1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))> |
#<alt (* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))> |
#<alt (* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))))> |
#<alt (* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))))> |
#<alt (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))> |
#<alt (+ (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))> |
#<alt (+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))))> |
#<alt (+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))> |
#<alt (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))> |
#<alt (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))> |
#<alt (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))))> |
#<alt (* -1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))> |
#<alt (* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))> |
#<alt (* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))))> |
#<alt (* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))))> |
#<alt (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))> |
#<alt (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))))))) (* b (sqrt 2)))) (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))))> |
#<alt (+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))))) (* b (sqrt 2)))))))> |
#<alt (+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))))) (* b (sqrt 2)))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))))) (* 1/2 (/ (* (pow x-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2)))))))) (* b (sqrt 2)))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))> |
#<alt (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))> |
#<alt (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))> |
#<alt (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))> |
#<alt (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))> |
#<alt (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))> |
#<alt (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))> |
#<alt (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))> |
#<alt (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))> |
#<alt (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))> |
#<alt (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))> |
#<alt (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))> |
#<alt (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))> |
#<alt (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))> |
#<alt (+ (* 1/8 (/ (* (pow angle 2) (* y-scale (* (sqrt 2) (* (sqrt 8) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))))))) b)) (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))))> |
#<alt (+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* y-scale (* (sqrt 2) (* (sqrt 8) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))))) b)) (* 1/8 (/ (* (pow angle 2) (* y-scale (* (sqrt 2) (* (sqrt 8) (- (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (* 1/4 (/ (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2) (pow b 2)))))))) b)))))> |
#<alt (+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* y-scale (* (sqrt 2) (* (sqrt 8) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))))) b)) (* (pow angle 2) (+ (* 1/8 (/ (* y-scale (* (sqrt 2) (* (sqrt 8) (- (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (* 1/4 (/ (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2) (pow b 2))))))) b)) (* 1/8 (/ (* (pow angle 2) (* y-scale (* (sqrt 2) (* (sqrt 8) (- (+ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6))))) (* 1/2 (/ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (- (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (* 1/4 (/ (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2) (pow b 2))))) (pow b 2)))))))) b)))))))> |
#<alt (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))> |
#<alt (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))> |
#<alt (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))> |
#<alt (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))> |
#<alt (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))> |
#<alt (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))> |
#<alt (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))> |
#<alt (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))> |
#<alt (* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))> |
#<alt (+ (* 1/8 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* a (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))> |
#<alt (+ (* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (* (pow b 2) (+ (* -1/32 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow a 3) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* 1/8 (/ (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (* a (sin (* 1/180 (* angle (PI))))))))))> |
#<alt (+ (* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (* (pow b 2) (+ (* 1/8 (/ (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (* a (sin (* 1/180 (* angle (PI))))))) (* (pow b 2) (+ (* -1/32 (/ (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8)))) (* (pow a 3) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* 1/64 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 6) (* (sqrt 2) (sqrt 8))))) (* (pow a 5) (pow (sin (* 1/180 (* angle (PI)))) 5)))))))))> |
#<alt (* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))> |
#<alt (* b (+ (* 1/8 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))> |
#<alt (* b (+ (* -1/32 (/ (* (pow a 4) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/8 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))> |
#<alt (* b (+ (* -1/32 (/ (* (pow a 4) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/64 (/ (* (pow a 6) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 6) (* (sqrt 2) (sqrt 8))))) (* (pow b 6) (pow (cos (* 1/180 (* angle (PI)))) 5)))) (+ (* 1/8 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))))> |
#<alt (* -1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))> |
#<alt (* -1 (* b (+ (* 1/8 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))> |
#<alt (* -1 (* b (+ (* -1/32 (/ (* (pow a 4) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/8 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))))> |
#<alt (* -1 (* b (+ (* -1/32 (/ (* (pow a 4) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/64 (/ (* (pow a 6) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 6) (* (sqrt 2) (sqrt 8))))) (* (pow b 6) (pow (cos (* 1/180 (* angle (PI)))) 5)))) (+ (* 1/8 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))))> |
#<alt (* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))> |
#<alt (+ (* 1/8 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* b (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))> |
#<alt (+ (* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (* (pow a 2) (+ (* -1/32 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow b 3) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (* 1/8 (/ (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (* b (cos (* 1/180 (* angle (PI))))))))))> |
#<alt (+ (* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (* (pow a 2) (+ (* 1/8 (/ (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (* b (cos (* 1/180 (* angle (PI))))))) (* (pow a 2) (+ (* -1/32 (/ (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8)))) (* (pow b 3) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (* 1/64 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 6) (* (sqrt 2) (sqrt 8))))) (* (pow b 5) (pow (cos (* 1/180 (* angle (PI)))) 5)))))))))> |
#<alt (* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))> |
#<alt (* a (+ (* 1/8 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))> |
#<alt (* a (+ (* -1/32 (/ (* (pow b 4) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/8 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))> |
#<alt (* a (+ (* -1/32 (/ (* (pow b 4) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/64 (/ (* (pow b 6) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 6) (* (sqrt 2) (sqrt 8))))) (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 5)))) (+ (* 1/8 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))))> |
#<alt (* -1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))> |
#<alt (* -1 (* a (+ (* 1/8 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))> |
#<alt (* -1 (* a (+ (* -1/32 (/ (* (pow b 4) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/8 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))))> |
#<alt (* -1 (* a (+ (* -1/32 (/ (* (pow b 4) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/64 (/ (* (pow b 6) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 6) (* (sqrt 2) (sqrt 8))))) (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 5)))) (+ (* 1/8 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))))> |
#<alt (* 1/4 (* y-scale (sqrt 8)))> |
#<alt (* 1/4 (* y-scale (sqrt 8)))> |
#<alt (* 1/4 (* y-scale (sqrt 8)))> |
#<alt (* 1/4 (* y-scale (sqrt 8)))> |
#<alt (* 1/4 (* y-scale (sqrt 8)))> |
#<alt (* 1/4 (* y-scale (sqrt 8)))> |
#<alt (* 1/4 (* y-scale (sqrt 8)))> |
#<alt (* 1/4 (* y-scale (sqrt 8)))> |
#<alt (* 1/4 (* y-scale (sqrt 8)))> |
#<alt (* 1/4 (* y-scale (sqrt 8)))> |
#<alt (* 1/4 (* y-scale (sqrt 8)))> |
#<alt (* 1/4 (* y-scale (sqrt 8)))> |
#<alt (* y-scale (sqrt 8))> |
#<alt (* y-scale (sqrt 8))> |
#<alt (* y-scale (sqrt 8))> |
#<alt (* y-scale (sqrt 8))> |
#<alt (* y-scale (sqrt 8))> |
#<alt (* y-scale (sqrt 8))> |
#<alt (* y-scale (sqrt 8))> |
#<alt (* y-scale (sqrt 8))> |
#<alt (* y-scale (sqrt 8))> |
#<alt (* y-scale (sqrt 8))> |
#<alt (* y-scale (sqrt 8))> |
#<alt (* y-scale (sqrt 8))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))> |
#<alt (+ (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))> |
#<alt (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))))> |
#<alt (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))))))> |
#<alt (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))> |
#<alt (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))> |
#<alt (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))))> |
#<alt (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))))> |
#<alt (* -1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))> |
#<alt (* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))))> |
#<alt (* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))))> |
#<alt (* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))> |
#<alt (+ (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))> |
#<alt (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))))> |
#<alt (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))))))> |
#<alt (* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))> |
#<alt (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))> |
#<alt (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))> |
#<alt (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))))> |
#<alt (* -1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))> |
#<alt (* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))> |
#<alt (* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))))> |
#<alt (* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))))> |
#<alt (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))> |
#<alt (+ (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))> |
#<alt (+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))))> |
#<alt (+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))> |
#<alt (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))> |
#<alt (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))> |
#<alt (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))))> |
#<alt (* -1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))> |
#<alt (* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))> |
#<alt (* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))))> |
#<alt (* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))))> |
#<alt (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))> |
#<alt (+ (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))> |
#<alt (+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))))> |
#<alt (+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))> |
#<alt (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))> |
#<alt (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))> |
#<alt (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))))> |
#<alt (* -1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))> |
#<alt (* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))> |
#<alt (* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))))> |
#<alt (* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))))> |
#<alt (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))> |
#<alt (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))))))) (* b (sqrt 2)))) (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))))> |
#<alt (+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))))) (* b (sqrt 2)))))))> |
#<alt (+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))))) (* b (sqrt 2)))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))))) (* 1/2 (/ (* (pow x-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2)))))))) (* b (sqrt 2)))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))> |
#<alt (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))> |
#<alt (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))> |
#<alt (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))> |
#<alt (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))> |
#<alt (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))> |
#<alt (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))> |
#<alt (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))> |
#<alt (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))> |
#<alt (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))> |
#<alt (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))> |
#<alt (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))> |
#<alt (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))> |
#<alt (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))> |
#<alt (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))> |
#<alt (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))> |
#<alt (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))> |
#<alt (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))> |
#<alt (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))> |
#<alt (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))> |
#<alt (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))> |
#<alt (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))> |
#<alt (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))> |
#<alt (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))> |
#<alt (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))> |
#<alt (* 1/4 b)> |
#<alt (* 1/4 b)> |
#<alt (* 1/4 b)> |
#<alt (* 1/4 b)> |
#<alt (* 1/4 b)> |
#<alt (* 1/4 b)> |
#<alt (* 1/4 b)> |
#<alt (* 1/4 b)> |
#<alt (* 1/4 b)> |
#<alt (* 1/4 b)> |
#<alt (* 1/4 b)> |
#<alt (* 1/4 b)> |
#<alt (* y-scale (* (sqrt 2) (sqrt 8)))> |
#<alt (* y-scale (* (sqrt 2) (sqrt 8)))> |
#<alt (* y-scale (* (sqrt 2) (sqrt 8)))> |
#<alt (* y-scale (* (sqrt 2) (sqrt 8)))> |
#<alt (* y-scale (* (sqrt 2) (sqrt 8)))> |
#<alt (* y-scale (* (sqrt 2) (sqrt 8)))> |
#<alt (* y-scale (* (sqrt 2) (sqrt 8)))> |
#<alt (* y-scale (* (sqrt 2) (sqrt 8)))> |
#<alt (* y-scale (* (sqrt 2) (sqrt 8)))> |
#<alt (* y-scale (* (sqrt 2) (sqrt 8)))> |
#<alt (* y-scale (* (sqrt 2) (sqrt 8)))> |
#<alt (* y-scale (* (sqrt 2) (sqrt 8)))> |
#<alt (* (pow x-scale 2) (pow y-scale 2))> |
#<alt (* (pow x-scale 2) (pow y-scale 2))> |
#<alt (* (pow x-scale 2) (pow y-scale 2))> |
#<alt (* (pow x-scale 2) (pow y-scale 2))> |
#<alt (* (pow x-scale 2) (pow y-scale 2))> |
#<alt (* (pow x-scale 2) (pow y-scale 2))> |
#<alt (* (pow x-scale 2) (pow y-scale 2))> |
#<alt (* (pow x-scale 2) (pow y-scale 2))> |
#<alt (* (pow x-scale 2) (pow y-scale 2))> |
#<alt (* (pow x-scale 2) (pow y-scale 2))> |
#<alt (* (pow x-scale 2) (pow y-scale 2))> |
#<alt (* (pow x-scale 2) (pow y-scale 2))> |
#<alt (* (pow x-scale 2) (pow y-scale 2))> |
#<alt (* (pow x-scale 2) (pow y-scale 2))> |
#<alt (* (pow x-scale 2) (pow y-scale 2))> |
#<alt (* (pow x-scale 2) (pow y-scale 2))> |
#<alt (* (pow x-scale 2) (pow y-scale 2))> |
#<alt (* (pow x-scale 2) (pow y-scale 2))> |
#<alt (* (pow x-scale 2) (pow y-scale 2))> |
#<alt (* (pow x-scale 2) (pow y-scale 2))> |
#<alt (* (pow x-scale 2) (pow y-scale 2))> |
#<alt (* (pow x-scale 2) (pow y-scale 2))> |
#<alt (* (pow x-scale 2) (pow y-scale 2))> |
#<alt (* (pow x-scale 2) (pow y-scale 2))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))> |
#<alt (+ (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))> |
#<alt (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))))> |
#<alt (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))))))> |
#<alt (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))> |
#<alt (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))> |
#<alt (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))))> |
#<alt (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))))> |
#<alt (* -1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))> |
#<alt (* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))))> |
#<alt (* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))))> |
#<alt (* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))> |
#<alt (+ (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))> |
#<alt (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))))> |
#<alt (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))))))> |
#<alt (* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))> |
#<alt (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))> |
#<alt (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))> |
#<alt (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))))> |
#<alt (* -1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))> |
#<alt (* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))> |
#<alt (* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))))> |
#<alt (* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))))> |
#<alt (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))> |
#<alt (+ (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))> |
#<alt (+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))))> |
#<alt (+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))> |
#<alt (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))> |
#<alt (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))> |
#<alt (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))))> |
#<alt (* -1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))> |
#<alt (* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))> |
#<alt (* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))))> |
#<alt (* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))))> |
#<alt (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))> |
#<alt (+ (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))> |
#<alt (+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))))> |
#<alt (+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))> |
#<alt (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))> |
#<alt (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))> |
#<alt (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))))> |
#<alt (* -1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))> |
#<alt (* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))> |
#<alt (* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))))> |
#<alt (* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))))> |
#<alt (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))> |
#<alt (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))))))) (* b (sqrt 2)))) (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))))> |
#<alt (+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))))) (* b (sqrt 2)))))))> |
#<alt (+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))))) (* b (sqrt 2)))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))))) (* 1/2 (/ (* (pow x-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2)))))))) (* b (sqrt 2)))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))> |
#<alt (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))> |
#<alt (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))> |
#<alt (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))> |
#<alt (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))> |
#<alt (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))> |
#<alt (* (pow a 2) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))> |
#<alt (* (pow a 2) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))> |
#<alt (* (pow a 2) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))> |
#<alt (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))> |
#<alt (* (pow a 2) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))> |
#<alt (* (pow a 2) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))> |
#<alt (* (pow a 2) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))> |
#<alt (/ (pow b 2) (pow x-scale 2))> |
#<alt (+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))))) (/ (pow b 2) (pow x-scale 2)))> |
#<alt (+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (/ (pow b 2) (pow x-scale 2)))> |
#<alt (+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* (pow angle 2) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2)))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))))) (/ (pow b 2) (pow x-scale 2)))> |
#<alt (/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))> |
#<alt (/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))> |
#<alt (/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))> |
#<alt (/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))> |
#<alt (/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))> |
#<alt (/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))> |
#<alt (/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))> |
#<alt (/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))> |
#<alt (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))> |
#<alt (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))> |
#<alt (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))> |
#<alt (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))> |
#<alt (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))> |
#<alt (* (pow b 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))> |
#<alt (* (pow b 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))> |
#<alt (* (pow b 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))> |
#<alt (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))> |
#<alt (* (pow b 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))> |
#<alt (* (pow b 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))> |
#<alt (* (pow b 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))> |
#<alt (/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))> |
#<alt (/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))> |
#<alt (/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))> |
#<alt (/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))> |
#<alt (/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))> |
#<alt (/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))> |
#<alt (/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))> |
#<alt (/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))> |
#<alt (/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))> |
#<alt (/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))> |
#<alt (/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))> |
#<alt (/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))> |
#<alt (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))> |
#<alt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))> |
#<alt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))> |
#<alt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))> |
#<alt (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))> |
#<alt (* (pow a 2) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))> |
#<alt (* (pow a 2) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))> |
#<alt (* (pow a 2) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))> |
#<alt (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))> |
#<alt (* (pow a 2) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))> |
#<alt (* (pow a 2) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))> |
#<alt (* (pow a 2) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))> |
#<alt (/ (pow a 2) (pow y-scale 2))> |
#<alt (+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (pow a 2) (pow y-scale 2)))> |
#<alt (+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))))) (/ (pow a 2) (pow y-scale 2)))> |
#<alt (+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* (pow angle 2) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))))) (/ (pow a 2) (pow y-scale 2)))> |
#<alt (/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))> |
#<alt (/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))> |
#<alt (/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))> |
#<alt (/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))> |
#<alt (/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))> |
#<alt (/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))> |
#<alt (/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))> |
#<alt (/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))> |
#<alt (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))> |
#<alt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))> |
#<alt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))> |
#<alt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))> |
#<alt (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))> |
#<alt (* (pow b 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))> |
#<alt (* (pow b 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))> |
#<alt (* (pow b 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))> |
#<alt (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))> |
#<alt (* (pow b 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))> |
#<alt (* (pow b 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))> |
#<alt (* (pow b 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))> |
#<alt (/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))> |
#<alt (/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))> |
#<alt (/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))> |
#<alt (/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))> |
#<alt (/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))> |
#<alt (/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))> |
#<alt (/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))> |
#<alt (/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))> |
#<alt (/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))> |
#<alt (/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))> |
#<alt (/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))> |
#<alt (/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))> |
#<alt (* (* (pow a 2) (* (pow b 2) (* x-scale (* y-scale (sqrt 8))))) (sqrt (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))> |
#<alt (* (pow b 2) (+ (* 1/4 (* (/ (* (pow a 2) (* b (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* (* (pow a 2) (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))> |
#<alt (* (pow b 2) (+ (* b (+ (* 1/4 (* (/ (* (pow a 2) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* 1/2 (* (* (pow a 2) (* b (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (+ (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))))) (sqrt (/ 1 (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) (* (* (pow a 2) (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))> |
#<alt (* (pow b 2) (+ (* b (+ (* 1/4 (* (/ (* (pow a 2) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* b (+ (* 1/2 (* (* (pow a 2) (* b (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 (pow a 3)) (* 2 (pow a 3))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (* 1/4 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 (pow a 3)) (* 2 (pow a 3))) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (+ (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))))))) (sqrt (/ 1 (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (* 1/2 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (+ (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (sqrt (/ 1 (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))))) (* (* (pow a 2) (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))> |
#<alt (* (* (pow a 2) (* (pow b 3) (* x-scale (* y-scale (sqrt 8))))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))> |
#<alt (* (pow b 3) (+ (* 1/4 (* (/ (* (pow a 2) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a))))) (* b (* x-scale y-scale))) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (* (* (pow a 2) (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))> |
#<alt (* (pow b 3) (+ (* 1/4 (* (/ (* (pow a 2) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a))))) (* b (* x-scale y-scale))) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (+ (* 1/2 (* (/ (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))))))))) (pow b 2)) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (* (* (pow a 2) (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))))> |
#<alt (* (pow b 3) (+ (* 1/4 (* (/ (* (pow a 2) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a))))) (* b (* x-scale y-scale))) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (+ (* 1/2 (* (/ (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 a) (* 2 a)) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (* 1/4 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 a) (* 2 a)) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))))) (pow b 3)) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (+ (* 1/2 (* (/ (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))))))))) (pow b 2)) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (* (* (pow a 2) (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))))> |
#<alt (* -1 (* (* (pow a 2) (* (pow b 3) (* x-scale (* y-scale (sqrt 8))))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))> |
#<alt (* -1 (* (pow b 3) (+ (* -1/4 (* (/ (* (pow a 2) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a))))) (* b (* x-scale y-scale))) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (* (* (pow a 2) (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))))> |
#<alt (* -1 (* (pow b 3) (+ (* -1 (/ (+ (* -1/2 (* (/ (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))))))))) b) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (* 1/4 (* (/ (* (pow a 2) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a))))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))))) b)) (* (* (pow a 2) (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))))> |
#<alt (* -1 (* (pow b 3) (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (* (/ (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 a) (* 2 a)) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (* 1/4 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 a) (* 2 a)) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))))) b) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (* 1/2 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))))))))) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) b)) (* 1/4 (* (/ (* (pow a 2) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a))))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))))) b)) (* (* (pow a 2) (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))))> |
#<alt (* (* (pow a 2) (* (pow b 2) (* x-scale (* y-scale (sqrt 8))))) (sqrt (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))> |
#<alt (* (pow a 2) (+ (* 1/4 (* (/ (* a (* (pow b 2) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* (* (pow b 2) (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))> |
#<alt (* (pow a 2) (+ (* a (+ (* 1/4 (* (/ (* (pow b 2) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* 1/2 (* (* a (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (+ (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))))) (sqrt (/ 1 (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (* (* (pow b 2) (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))> |
#<alt (* (pow a 2) (+ (* a (+ (* 1/4 (* (/ (* (pow b 2) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* a (+ (* 1/2 (* (* a (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 (pow b 3)) (* 2 (pow b 3))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (* 1/4 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 (pow b 3)) (* 2 (pow b 3))) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (+ (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))) (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))))))) (sqrt (/ 1 (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (* 1/2 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (+ (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (sqrt (/ 1 (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))))) (* (* (pow b 2) (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))> |
#<alt (* (* (pow a 3) (* (pow b 2) (* x-scale (* y-scale (sqrt 8))))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))> |
#<alt (* (pow a 3) (+ (* 1/4 (* (/ (* (pow b 2) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b))))) (* a (* x-scale y-scale))) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (* (* (pow b 2) (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))> |
#<alt (* (pow a 3) (+ (* 1/4 (* (/ (* (pow b 2) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b))))) (* a (* x-scale y-scale))) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (+ (* 1/2 (* (/ (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))))))))) (pow a 2)) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))) (* (* (pow b 2) (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))))> |
#<alt (* (pow a 3) (+ (* 1/4 (* (/ (* (pow b 2) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b))))) (* a (* x-scale y-scale))) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (+ (* 1/2 (* (/ (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 b) (* 2 b)) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (* 1/4 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 b) (* 2 b)) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))))) (pow a 3)) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))) (+ (* 1/2 (* (/ (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))))))))) (pow a 2)) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))) (* (* (pow b 2) (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))))> |
#<alt (* -1 (* (* (pow a 3) (* (pow b 2) (* x-scale (* y-scale (sqrt 8))))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))> |
#<alt (* -1 (* (pow a 3) (+ (* -1/4 (* (/ (* (pow b 2) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b))))) (* a (* x-scale y-scale))) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (* (* (pow b 2) (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))))> |
#<alt (* -1 (* (pow a 3) (+ (* -1 (/ (+ (* -1/2 (* (/ (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))))))))) a) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))) (* 1/4 (* (/ (* (pow b 2) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b))))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))))) a)) (* (* (pow b 2) (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))))> |
#<alt (* -1 (* (pow a 3) (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (* (/ (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 b) (* 2 b)) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (* 1/4 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 b) (* 2 b)) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))))) a) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))) (* 1/2 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))))))))) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) a)) (* 1/4 (* (/ (* (pow b 2) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b))))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))))) a)) (* (* (pow b 2) (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))))> |
#<alt (* (* (pow a 2) (* (pow b 2) (* y-scale (sqrt 8)))) (sqrt (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))> |
#<alt (+ (* 1/2 (* (* (pow a 2) (* (pow b 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (* (* (pow a 2) (* (pow b 2) (* y-scale (sqrt 8)))) (sqrt (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))> |
#<alt (+ (* (* (pow a 2) (* (pow b 2) (* y-scale (sqrt 8)))) (sqrt (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* (pow x-scale 2) (+ (* 1/2 (* (* (pow a 2) (* (pow b 2) (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (* 1/2 (* (* (pow a 2) (* (pow b 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))))> |
#<alt (+ (* (* (pow a 2) (* (pow b 2) (* y-scale (sqrt 8)))) (sqrt (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* (pow x-scale 2) (+ (* 1/2 (* (* (pow a 2) (* (pow b 2) (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (* (pow x-scale 2) (+ (* 1/2 (* (* (pow a 2) (* (pow b 2) (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (* 1/2 (* (* (pow a 2) (* (pow b 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))))))> |
#<alt (* (* (pow a 2) (* (pow b 2) (* x-scale (* y-scale (sqrt 8))))) (sqrt (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))> |
#<alt (* x-scale (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (* (* (pow a 2) (* (pow b 2) (* y-scale (sqrt 8)))) (sqrt (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))> |
#<alt (* x-scale (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (* (* (pow a 2) (* (pow b 2) (* y-scale (sqrt 8)))) (sqrt (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))> |
#<alt (* x-scale (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))))) (pow x-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (* (* (pow a 2) (* (pow b 2) (* y-scale (sqrt 8)))) (sqrt (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))))> |
#<alt (* -1 (* (* (pow a 2) (* (pow b 2) (* x-scale (* y-scale (sqrt 8))))) (sqrt (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))> |
#<alt (* -1 (* x-scale (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (* (* (pow a 2) (* (pow b 2) (* y-scale (sqrt 8)))) (sqrt (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))> |
#<alt (* -1 (* x-scale (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (* (* (pow a 2) (* (pow b 2) (* y-scale (sqrt 8)))) (sqrt (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))))> |
#<alt (* -1 (* x-scale (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))))) (pow x-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (* (* (pow a 2) (* (pow b 2) (* y-scale (sqrt 8)))) (sqrt (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))))> |
#<alt (* (* (pow a 2) (* (pow b 2) (* x-scale (sqrt 8)))) (sqrt (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))> |
#<alt (+ (* 1/2 (* (* (pow a 2) (* (pow b 2) (* x-scale (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (* (* (pow a 2) (* (pow b 2) (* x-scale (sqrt 8)))) (sqrt (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))> |
#<alt (+ (* (* (pow a 2) (* (pow b 2) (* x-scale (sqrt 8)))) (sqrt (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* (pow y-scale 2) (+ (* 1/2 (* (* (pow a 2) (* (pow b 2) (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (* 1/2 (* (* (pow a 2) (* (pow b 2) (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))))> |
#<alt (+ (* (* (pow a 2) (* (pow b 2) (* x-scale (sqrt 8)))) (sqrt (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* (pow y-scale 2) (+ (* 1/2 (* (* (pow a 2) (* (pow b 2) (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (* (pow y-scale 2) (+ (* 1/2 (* (* (pow a 2) (* (pow b 2) (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (* 1/2 (* (* (pow a 2) (* (pow b 2) (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))))))> |
#<alt (* (* (pow a 2) (* (pow b 2) (* x-scale (* y-scale (sqrt 8))))) (sqrt (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))> |
#<alt (* y-scale (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (* (* (pow a 2) (* (pow b 2) (* x-scale (sqrt 8)))) (sqrt (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))> |
#<alt (* y-scale (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (* (* (pow a 2) (* (pow b 2) (* x-scale (sqrt 8)))) (sqrt (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))> |
#<alt (* y-scale (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* x-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))))) (pow y-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (* (* (pow a 2) (* (pow b 2) (* x-scale (sqrt 8)))) (sqrt (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))))> |
#<alt (* -1 (* (* (pow a 2) (* (pow b 2) (* x-scale (* y-scale (sqrt 8))))) (sqrt (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))> |
#<alt (* -1 (* y-scale (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (* (* (pow a 2) (* (pow b 2) (* x-scale (sqrt 8)))) (sqrt (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))> |
#<alt (* -1 (* y-scale (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (* (* (pow a 2) (* (pow b 2) (* x-scale (sqrt 8)))) (sqrt (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))))> |
#<alt (* -1 (* y-scale (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* x-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))))) (pow y-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (* (* (pow a 2) (* (pow b 2) (* x-scale (sqrt 8)))) (sqrt (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))))> |
#<alt (* (pow a 2) (* (pow b 3) (* y-scale (* (sqrt 2) (sqrt 8)))))> |
#<alt (+ (* 1/2 (/ (* (pow a 2) (* (pow angle 2) (* b (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))))))))) (sqrt 2))) (* (pow a 2) (* (pow b 3) (* y-scale (* (sqrt 2) (sqrt 8))))))> |
#<alt (+ (* (pow a 2) (* (pow b 3) (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow a 2) (* b (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))))))) (sqrt 2))) (* 1/2 (/ (* (pow a 2) (* (pow angle 2) (* b (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/2 (/ (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))))))) (sqrt 2))))))> |
#<alt (+ (* (pow a 2) (* (pow b 3) (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow a 2) (* b (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))))))) (sqrt 2))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow a 2) (* b (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/2 (/ (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2)))))))))) (sqrt 2))) (* 1/2 (/ (* (pow a 2) (* (pow angle 2) (* b (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow y-scale 2))) (+ (* -1/765275040000000 (/ (* (pow b 2) (pow (PI) 6)) (pow x-scale 2))) (+ (* 1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow x-scale 2))) (+ (* 1/765275040000000 (/ (* (pow b 2) (pow (PI) 6)) (pow y-scale 2))) (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))))) (+ (* 2 (* (- (+ (* -1/765275040000000 (/ (* (pow b 2) (pow (PI) 6)) (pow x-scale 2))) (* 1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow x-scale 2)))) (+ (* -1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow y-scale 2))) (* 1/765275040000000 (/ (* (pow b 2) (pow (PI) 6)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow (+ a b) 2) (* (+ (* 1/31886460000000 (pow (PI) 6)) (* 1/19131876000000 (pow (PI) 6))) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (* 1/2 (/ (* (pow x-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/2 (/ (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))) (* (pow b 2) (pow (sqrt 2) 2))))))))))) (sqrt 2))))))))> |
#<alt (* (* (pow a 2) (* (pow b 2) (* x-scale (* y-scale (sqrt 8))))) (sqrt (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))> |
#<alt (* (* (pow a 2) (* (pow b 2) (* x-scale (* y-scale (sqrt 8))))) (sqrt (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))> |
#<alt (* (* (pow a 2) (* (pow b 2) (* x-scale (* y-scale (sqrt 8))))) (sqrt (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))> |
#<alt (* (* (pow a 2) (* (pow b 2) (* x-scale (* y-scale (sqrt 8))))) (sqrt (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))> |
#<alt (* (* (pow a 2) (* (pow b 2) (* x-scale (* y-scale (sqrt 8))))) (sqrt (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))> |
#<alt (* (* (pow a 2) (* (pow b 2) (* x-scale (* y-scale (sqrt 8))))) (sqrt (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))> |
#<alt (* (* (pow a 2) (* (pow b 2) (* x-scale (* y-scale (sqrt 8))))) (sqrt (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))> |
#<alt (* (* (pow a 2) (* (pow b 2) (* x-scale (* y-scale (sqrt 8))))) (sqrt (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))> |
#<alt (* 1/90 (* angle (PI)))> |
#<alt (* 1/90 (* angle (PI)))> |
#<alt (* 1/90 (* angle (PI)))> |
#<alt (* 1/90 (* angle (PI)))> |
#<alt (* 1/90 (* angle (PI)))> |
#<alt (* 1/90 (* angle (PI)))> |
#<alt (* 1/90 (* angle (PI)))> |
#<alt (* 1/90 (* angle (PI)))> |
#<alt (* 1/90 (* angle (PI)))> |
#<alt (* 1/90 (* angle (PI)))> |
#<alt (* 1/90 (* angle (PI)))> |
#<alt (* 1/90 (* angle (PI)))> |
#<alt (/ 1/4 (* (pow a 2) (pow b 2)))> |
#<alt (/ 1/4 (* (pow a 2) (pow b 2)))> |
#<alt (/ 1/4 (* (pow a 2) (pow b 2)))> |
#<alt (/ 1/4 (* (pow a 2) (pow b 2)))> |
#<alt (/ 1/4 (* (pow a 2) (pow b 2)))> |
#<alt (/ 1/4 (* (pow a 2) (pow b 2)))> |
#<alt (/ 1/4 (* (pow a 2) (pow b 2)))> |
#<alt (/ 1/4 (* (pow a 2) (pow b 2)))> |
#<alt (/ 1/4 (* (pow a 2) (pow b 2)))> |
#<alt (/ 1/4 (* (pow a 2) (pow b 2)))> |
#<alt (/ 1/4 (* (pow a 2) (pow b 2)))> |
#<alt (/ 1/4 (* (pow a 2) (pow b 2)))> |
#<alt (/ 1/4 (* (pow a 2) (pow b 2)))> |
#<alt (/ 1/4 (* (pow a 2) (pow b 2)))> |
#<alt (/ 1/4 (* (pow a 2) (pow b 2)))> |
#<alt (/ 1/4 (* (pow a 2) (pow b 2)))> |
#<alt (/ 1/4 (* (pow a 2) (pow b 2)))> |
#<alt (/ 1/4 (* (pow a 2) (pow b 2)))> |
#<alt (/ 1/4 (* (pow a 2) (pow b 2)))> |
#<alt (/ 1/4 (* (pow a 2) (pow b 2)))> |
#<alt (/ 1/4 (* (pow a 2) (pow b 2)))> |
#<alt (/ 1/4 (* (pow a 2) (pow b 2)))> |
#<alt (/ 1/4 (* (pow a 2) (pow b 2)))> |
#<alt (/ 1/4 (* (pow a 2) (pow b 2)))> |
#<alt (* -4 (* (pow a 2) (pow b 2)))> |
#<alt (* -4 (* (pow a 2) (pow b 2)))> |
#<alt (* -4 (* (pow a 2) (pow b 2)))> |
#<alt (* -4 (* (pow a 2) (pow b 2)))> |
#<alt (* -4 (* (pow a 2) (pow b 2)))> |
#<alt (* -4 (* (pow a 2) (pow b 2)))> |
#<alt (* -4 (* (pow a 2) (pow b 2)))> |
#<alt (* -4 (* (pow a 2) (pow b 2)))> |
#<alt (* -4 (* (pow a 2) (pow b 2)))> |
#<alt (* -4 (* (pow a 2) (pow b 2)))> |
#<alt (* -4 (* (pow a 2) (pow b 2)))> |
#<alt (* -4 (* (pow a 2) (pow b 2)))> |
#<alt (* -4 (* (pow a 2) (pow b 2)))> |
#<alt (* -4 (* (pow a 2) (pow b 2)))> |
#<alt (* -4 (* (pow a 2) (pow b 2)))> |
#<alt (* -4 (* (pow a 2) (pow b 2)))> |
#<alt (* -4 (* (pow a 2) (pow b 2)))> |
#<alt (* -4 (* (pow a 2) (pow b 2)))> |
#<alt (* -4 (* (pow a 2) (pow b 2)))> |
#<alt (* -4 (* (pow a 2) (pow b 2)))> |
#<alt (* -4 (* (pow a 2) (pow b 2)))> |
#<alt (* -4 (* (pow a 2) (pow b 2)))> |
#<alt (* -4 (* (pow a 2) (pow b 2)))> |
#<alt (* -4 (* (pow a 2) (pow b 2)))> |
#<alt (* 1/2 (/ (pow y-scale 2) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))> |
#<alt (+ (* -1/2 (/ (* (pow b 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (* 1/2 (/ (pow y-scale 2) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))> |
#<alt (+ (* 1/2 (/ (pow y-scale 2) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (- (* 1/2 (/ (* (pow b 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 6) (pow (cos (* 1/180 (* angle (PI)))) 6)))) (* 1/2 (/ (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))))> |
#<alt (+ (* 1/2 (/ (pow y-scale 2) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (- (* (pow b 2) (- (* -1/2 (/ (* (pow b 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* (pow a 8) (pow (cos (* 1/180 (* angle (PI)))) 8)))) (* -1/2 (/ (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow a 6) (pow (cos (* 1/180 (* angle (PI)))) 6)))))) (* 1/2 (/ (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))))> |
#<alt (* 1/2 (/ (pow y-scale 2) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))> |
#<alt (/ (+ (* -1/2 (/ (* (pow a 2) (* (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 1/2 (/ (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow b 2))> |
#<alt (/ (- (+ (* 1/2 (/ (* (pow a 4) (* (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/2 (/ (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* 1/2 (/ (* (pow a 2) (* (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow b 2))> |
#<alt (/ (- (+ (* -1/2 (/ (* (pow a 6) (* (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 6))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 8)))) (* 1/2 (/ (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (* -1/2 (/ (* (pow a 4) (* (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/2 (/ (* (pow a 2) (* (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (pow b 2))> |
#<alt (* 1/2 (/ (pow y-scale 2) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))> |
#<alt (/ (+ (* -1/2 (/ (* (pow a 2) (* (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 1/2 (/ (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow b 2))> |
#<alt (/ (- (+ (* 1/2 (/ (* (pow a 4) (* (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/2 (/ (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* 1/2 (/ (* (pow a 2) (* (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow b 2))> |
#<alt (/ (- (+ (* -1/2 (/ (* (pow a 6) (* (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 6))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 8)))) (* 1/2 (/ (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (* -1/2 (/ (* (pow a 4) (* (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/2 (/ (* (pow a 2) (* (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (pow b 2))> |
#<alt (* 1/2 (/ (pow y-scale 2) (pow a 2)))> |
#<alt (+ (* -1/2 (/ (* (pow angle 2) (* (pow y-scale 4) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 4))) (* 1/2 (/ (pow y-scale 2) (pow a 2))))> |
#<alt (+ (* 1/2 (/ (pow y-scale 2) (pow a 2))) (* (pow angle 2) (- (* -1 (* (pow angle 2) (+ (* -1/2 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (* 1/2 (/ (* (pow y-scale 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (pow a 4)))))) (* 1/2 (/ (* (pow y-scale 4) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow a 4))))))> |
#<alt (+ (* 1/2 (/ (pow y-scale 2) (pow a 2))) (* (pow angle 2) (- (* (pow angle 2) (- (* -1 (* (pow angle 2) (+ (* -1 (/ (* (pow y-scale 2) (* (+ (* -1/2 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (* 1/2 (/ (* (pow y-scale 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (pow a 4)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2))) (+ (* -1/2 (/ (* (pow y-scale 6) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))) (pow a 6))) (* 1/2 (/ (* (pow y-scale 4) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (pow a 4))))))) (+ (* -1/2 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (* 1/2 (/ (* (pow y-scale 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (pow a 4)))))) (* 1/2 (/ (* (pow y-scale 4) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow a 4))))))> |
#<alt (/ 1/2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))> |
#<alt (/ 1/2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))> |
#<alt (/ 1/2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))> |
#<alt (/ 1/2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))> |
#<alt (/ 1/2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))> |
#<alt (/ 1/2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))> |
#<alt (/ 1/2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))> |
#<alt (/ 1/2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))> |
#<alt (* 1/2 (/ (pow y-scale 2) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))> |
#<alt (* 1/2 (/ (pow y-scale 2) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))> |
#<alt (* 1/2 (/ (pow y-scale 2) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))> |
#<alt (* 1/2 (/ (pow y-scale 2) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))> |
#<alt (* 1/2 (/ (pow y-scale 2) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))> |
#<alt (* 1/2 (/ (pow y-scale 2) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))> |
#<alt (* 1/2 (/ (pow y-scale 2) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))> |
#<alt (* 1/2 (/ (pow y-scale 2) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))> |
#<alt (* 1/2 (/ (pow y-scale 2) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))> |
#<alt (* 1/2 (/ (pow y-scale 2) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))> |
#<alt (* 1/2 (/ (pow y-scale 2) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))> |
#<alt (* 1/2 (/ (pow y-scale 2) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))> |
#<alt (* 1/2 (/ (pow y-scale 2) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))> |
#<alt (+ (* -1/2 (/ (* (pow a 2) (* (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 1/2 (/ (pow y-scale 2) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))> |
#<alt (+ (* 1/2 (/ (pow y-scale 2) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (- (* 1/2 (/ (* (pow a 2) (* (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/2 (/ (* (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))> |
#<alt (+ (* 1/2 (/ (pow y-scale 2) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (- (* (pow a 2) (- (* -1/2 (/ (* (pow a 2) (* (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 6))) (* (pow b 8) (pow (sin (* 1/180 (* angle (PI)))) 8)))) (* -1/2 (/ (* (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (* 1/2 (/ (* (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))> |
#<alt (* 1/2 (/ (pow y-scale 2) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))> |
#<alt (/ (+ (* -1/2 (/ (* (pow b 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (* 1/2 (/ (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow a 2))> |
#<alt (/ (- (+ (* 1/2 (/ (* (pow b 4) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 6)))) (* 1/2 (/ (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* 1/2 (/ (* (pow b 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (pow a 2))> |
#<alt (/ (- (+ (* -1/2 (/ (* (pow b 6) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* (pow a 6) (pow (cos (* 1/180 (* angle (PI)))) 8)))) (* 1/2 (/ (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (+ (* -1/2 (/ (* (pow b 4) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 6)))) (* 1/2 (/ (* (pow b 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (pow a 2))> |
#<alt (* 1/2 (/ (pow y-scale 2) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))> |
#<alt (/ (+ (* -1/2 (/ (* (pow b 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (* 1/2 (/ (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow a 2))> |
#<alt (/ (- (+ (* 1/2 (/ (* (pow b 4) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 6)))) (* 1/2 (/ (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* 1/2 (/ (* (pow b 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (pow a 2))> |
#<alt (/ (- (+ (* -1/2 (/ (* (pow b 6) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* (pow a 6) (pow (cos (* 1/180 (* angle (PI)))) 8)))) (* 1/2 (/ (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (+ (* -1/2 (/ (* (pow b 4) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 6)))) (* 1/2 (/ (* (pow b 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (pow a 2))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))> |
#<alt (+ (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))> |
#<alt (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))))> |
#<alt (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))))))> |
#<alt (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))> |
#<alt (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))> |
#<alt (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))))> |
#<alt (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))))> |
#<alt (* -1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))> |
#<alt (* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))))> |
#<alt (* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))))> |
#<alt (* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))> |
#<alt (+ (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))> |
#<alt (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))))> |
#<alt (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))))))> |
#<alt (* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))> |
#<alt (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))> |
#<alt (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))> |
#<alt (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))))> |
#<alt (* -1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))> |
#<alt (* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))> |
#<alt (* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))))> |
#<alt (* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))))> |
#<alt (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))> |
#<alt (+ (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))> |
#<alt (+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))))> |
#<alt (+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))> |
#<alt (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))> |
#<alt (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))> |
#<alt (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))))> |
#<alt (* -1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))> |
#<alt (* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))> |
#<alt (* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))))> |
#<alt (* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))))> |
#<alt (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))> |
#<alt (+ (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))> |
#<alt (+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))))> |
#<alt (+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))> |
#<alt (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))> |
#<alt (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))> |
#<alt (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))))> |
#<alt (* -1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))> |
#<alt (* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))> |
#<alt (* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))))> |
#<alt (* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))))> |
#<alt (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))> |
#<alt (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))))))) (* b (sqrt 2)))) (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))))> |
#<alt (+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))))) (* b (sqrt 2)))))))> |
#<alt (+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))))) (* b (sqrt 2)))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))))) (* 1/2 (/ (* (pow x-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2)))))))) (* b (sqrt 2)))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))> |
#<alt (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) x-scale) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))> |
#<alt (/ (+ (* 1/8 (* (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* (pow x-scale 2) (* y-scale (* (sqrt 2) (sqrt 8)))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) x-scale)> |
#<alt (/ (+ (* 1/8 (* (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* (pow x-scale 2) (* y-scale (* (sqrt 2) (sqrt 8)))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) x-scale)> |
#<alt (/ (+ (* 1/8 (* (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* (pow x-scale 2) (* y-scale (* (sqrt 2) (sqrt 8)))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) x-scale)> |
#<alt (* 1/4 (* (* x-scale (* y-scale (* (sqrt 2) (sqrt 8)))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))> |
#<alt (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))> |
#<alt (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))> |
#<alt (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (* (sqrt 2) (sqrt 8)))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))> |
#<alt (* -1 (* x-scale (+ (* -1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* -1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))> |
#<alt (* -1 (* x-scale (+ (* -1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* -1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))> |
#<alt (* -1 (* x-scale (+ (* -1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* -1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))> |
#<alt (* 1/4 (* (* x-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))> |
#<alt (+ (* 1/8 (* (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) x-scale) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* 1/4 (* (* x-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))> |
#<alt (+ (* 1/8 (* (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) x-scale) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* 1/4 (* (* x-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))> |
#<alt (+ (* 1/8 (* (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) x-scale) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* 1/4 (* (* x-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))> |
#<alt (* 1/8 (* (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) x-scale) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))> |
#<alt (* (pow y-scale 2) (+ (* 1/8 (* (/ (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) x-scale) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* 1/4 (* (/ (* x-scale (* (sqrt 2) (sqrt 8))) (pow y-scale 2)) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))> |
#<alt (* (pow y-scale 2) (+ (* 1/8 (* (/ (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) x-scale) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* 1/4 (* (/ (* x-scale (* (sqrt 2) (sqrt 8))) (pow y-scale 2)) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))> |
#<alt (* (pow y-scale 2) (+ (* 1/8 (* (/ (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) x-scale) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* 1/4 (* (/ (* x-scale (* (sqrt 2) (sqrt 8))) (pow y-scale 2)) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))> |
#<alt (* -1/8 (* (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) x-scale) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))> |
#<alt (* (pow y-scale 2) (+ (* -1/4 (* (/ (* x-scale (* (sqrt 2) (sqrt 8))) (pow y-scale 2)) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* -1/8 (* (/ (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) x-scale) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))> |
#<alt (* (pow y-scale 2) (+ (* -1/4 (* (/ (* x-scale (* (sqrt 2) (sqrt 8))) (pow y-scale 2)) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* -1/8 (* (/ (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) x-scale) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))> |
#<alt (* (pow y-scale 2) (+ (* -1/4 (* (/ (* x-scale (* (sqrt 2) (sqrt 8))) (pow y-scale 2)) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* -1/8 (* (/ (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) x-scale) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))> |
#<alt (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (* 1/4 (* a (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))> |
#<alt (+ (* 1/4 (/ (* b (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))))))) (* (pow a 3) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (* 1/4 (* a (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))> |
#<alt (+ (* b (+ (* 1/4 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))))) (* (pow a 3) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (* b (* x-scale (+ (* 1/8 (+ (* -1/2 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow a 3) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 3))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))))) (* 1/8 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))) (* a (cos (* 1/180 (* angle (PI)))))))))))) (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (* 1/4 (* a (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))> |
#<alt (+ (* b (+ (* 1/4 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))))) (* (pow a 3) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (* b (+ (* 1/8 (* b (* x-scale (+ (* -1 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))))) (* (pow a 5) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 3))))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (pow a 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))))))) (* x-scale (+ (* 1/8 (+ (* -1/2 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow a 3) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 3))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))))) (* 1/8 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))) (* a (cos (* 1/180 (* angle (PI))))))))))))) (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (* 1/4 (* a (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))> |
#<alt (* b (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))> |
#<alt (* b (+ (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))))) (* b (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))> |
#<alt (* b (+ (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))))) (* b (* x-scale (sin (* 1/180 (* angle (PI)))))))) (+ (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (/ (* x-scale (+ (* 1/8 (+ (* -1/2 (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2)))))> |
#<alt (* b (+ (* 1/8 (/ (* x-scale (+ (* -1 (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 a) (* 2 a))))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* 4 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (+ (* -2 a) (* 2 a)))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))))) (pow b 3))) (+ (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))))) (* b (* x-scale (sin (* 1/180 (* angle (PI)))))))) (+ (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (/ (* x-scale (+ (* 1/8 (+ (* -1/2 (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))))> |
#<alt (* -1 (* b (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))> |
#<alt (* -1 (* b (+ (* -1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))))) (* b (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))))> |
#<alt (* -1 (* b (+ (* -1 (/ (+ (* -1 (/ (* x-scale (+ (* 1/8 (+ (* -1/2 (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (sin (* 1/180 (* angle (PI)))))))) b)) (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))) b)) (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))))> |
#<alt (* -1 (* b (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (/ (* x-scale (+ (* -1 (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 a) (* 2 a))))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* 4 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (+ (* -2 a) (* 2 a)))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))))) b)) (* x-scale (+ (* 1/8 (+ (* -1/2 (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (sin (* 1/180 (* angle (PI))))))))) b)) (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))) b)) (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))))> |
#<alt (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (pow b 2)) (pow b 2))))) (* a (pow x-scale 2)))) (* 1/4 (* a (* (sqrt 2) (sqrt 8))))))> |
#<alt (+ (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (pow b 2)) (pow b 2))))) (* a (pow x-scale 2)))) (* 1/4 (* a (* (sqrt 2) (sqrt 8)))))) (* (pow angle 2) (* x-scale (+ (* 1/8 (+ (* -1/2 (/ (* (pow y-scale 4) (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1 (pow b 2)) (pow b 2)) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))))) (* (pow a 3) (pow x-scale 2)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))))))) (* a (pow x-scale 2))))) (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 2) (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))))) a))))))> |
#<alt (+ (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (pow b 2)) (pow b 2))))) (* a (pow x-scale 2)))) (* 1/4 (* a (* (sqrt 2) (sqrt 8)))))) (* (pow angle 2) (+ (* x-scale (+ (* 1/8 (+ (* -1/2 (/ (* (pow y-scale 4) (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1 (pow b 2)) (pow b 2)) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))))) (* (pow a 3) (pow x-scale 2)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))))))) (* a (pow x-scale 2))))) (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 2) (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))))) a)))) (* (pow angle 2) (* x-scale (+ (* 1/8 (+ (* -1/2 (/ (* a (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (+ (* 1/4 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (/ (* (pow y-scale 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (pow a 4)))) (+ (* -1 (pow b 2)) (pow b 2)))))) (pow x-scale 2))) (+ (* -1/2 (/ (* (pow y-scale 4) (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2))))))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))))) (* (pow a 3) (pow x-scale 2)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (+ (* (pow b 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 2))))) (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))))) (pow a 2)) (+ (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))) (pow a 2))) (/ (* (pow y-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))) (pow a 2))))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))) (* a (pow x-scale 2)))))) (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 2) (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 2))))))) a))))))))> |
#<alt (+ (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (pow b 2)) (pow b 2))))) (* a (pow x-scale 2)))) (* 1/4 (* a (* (sqrt 2) (sqrt 8)))))) (* (pow angle 2) (+ (* x-scale (+ (* 1/8 (+ (* -1/2 (/ (* (pow y-scale 4) (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1 (pow b 2)) (pow b 2)) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))))) (* (pow a 3) (pow x-scale 2)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))))))) (* a (pow x-scale 2))))) (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 2) (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))))) a)))) (* (pow angle 2) (+ (* x-scale (+ (* 1/8 (+ (* -1/2 (/ (* a (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (+ (* 1/4 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (/ (* (pow y-scale 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (pow a 4)))) (+ (* -1 (pow b 2)) (pow b 2)))))) (pow x-scale 2))) (+ (* -1/2 (/ (* (pow y-scale 4) (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2))))))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))))) (* (pow a 3) (pow x-scale 2)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (+ (* (pow b 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 2))))) (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))))) (pow a 2)) (+ (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))) (pow a 2))) (/ (* (pow y-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))) (pow a 2))))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))) (* a (pow x-scale 2)))))) (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 2) (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 2))))))) a)))) (* (pow angle 2) (* x-scale (+ (* 1/8 (+ (* -1/2 (/ (* a (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1 (/ (* (pow y-scale 2) (* (+ (* -1 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (/ (* (pow y-scale 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (pow a 4))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2))) (+ (* -1 (/ (* (pow y-scale 6) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))) (pow a 6))) (+ (* 1/2 (/ (* (pow y-scale 2) (* (+ (* -1 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (+ (* 1/4 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (/ (* (pow y-scale 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (pow a 4)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2))) (/ (* (pow y-scale 4) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (pow a 4))))) (+ (* -1 (pow b 2)) (pow b 2)))))) (pow x-scale 2))) (+ (* -1/2 (/ (* a (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (+ (* 1/4 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (/ (* (pow y-scale 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (pow a 4)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2))))))))))) (pow x-scale 2))) (+ (* -1/2 (/ (* (pow y-scale 4) (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (+ (* (pow b 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 2))))) (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))))) (pow a 2)) (+ (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))) (pow a 2))) (/ (* (pow y-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))) (pow a 2))))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))))))) (* (pow a 3) (pow x-scale 2)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (+ (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (+ (* (pow b 2) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))))) (pow y-scale 2)))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- b a) 2)))) (pow y-scale 2))) (/ (* (pow (+ a b) 2) (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- b a) 2))) (pow y-scale 2))))))) (pow a 2)) (+ (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))))) (pow a 2))) (+ (/ (* (pow y-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (+ (* (pow b 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 2))))) (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))))) (pow a 2)) (+ (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))) (pow a 2))) (/ (* (pow y-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))) (pow a 2)))))) (pow a 2)) (/ (* (pow y-scale 2) (* (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))) (pow a 2)))))) (+ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6))))))))) (* a (pow x-scale 2))))))) (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 2) (* (sqrt 8) (- (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 2)))))) (pow a 2))))))) a))))))))))> |
#<alt (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))> |
#<alt (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))> |
#<alt (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))> |
#<alt (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))> |
#<alt (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))> |
#<alt (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))> |
#<alt (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))> |
#<alt (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))> |
#<alt (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/4 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))> |
#<alt (+ (* 1/4 (/ (* a (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))))))) (* (pow b 3) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/4 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))> |
#<alt (+ (* a (+ (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))))) (* (pow b 3) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* a (* x-scale (+ (* 1/8 (+ (* -1/2 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow b 3) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))))) (* 1/8 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))) (* b (sin (* 1/180 (* angle (PI)))))))))))) (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/4 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))> |
#<alt (+ (* a (+ (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))))) (* (pow b 3) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* a (+ (* 1/8 (* a (* x-scale (+ (* -1 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))))) (* (pow b 5) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (pow b 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))))))) (* x-scale (+ (* 1/8 (+ (* -1/2 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow b 3) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))))) (* 1/8 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))) (* b (sin (* 1/180 (* angle (PI))))))))))))) (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/4 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))> |
#<alt (* a (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))> |
#<alt (* a (+ (* 1/4 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))))) (* a (* x-scale (cos (* 1/180 (* angle (PI)))))))) (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))> |
#<alt (* a (+ (* 1/4 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))))) (* a (* x-scale (cos (* 1/180 (* angle (PI)))))))) (+ (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (/ (* x-scale (+ (* 1/8 (+ (* -1/2 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (* 1/8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (cos (* 1/180 (* angle (PI)))))))) (pow a 2)))))> |
#<alt (* a (+ (* 1/8 (/ (* x-scale (+ (* -1 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 b) (* 2 b))))))) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* 4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (+ (* -2 b) (* 2 b)))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))))) (pow a 3))) (+ (* 1/4 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))))) (* a (* x-scale (cos (* 1/180 (* angle (PI)))))))) (+ (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (/ (* x-scale (+ (* 1/8 (+ (* -1/2 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (* 1/8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (cos (* 1/180 (* angle (PI)))))))) (pow a 2))))))> |
#<alt (* -1 (* a (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))> |
#<alt (* -1 (* a (+ (* -1/4 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))))) (* a (* x-scale (cos (* 1/180 (* angle (PI)))))))) (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))))> |
#<alt (* -1 (* a (+ (* -1 (/ (+ (* -1 (/ (* x-scale (+ (* 1/8 (+ (* -1/2 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (* 1/8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (cos (* 1/180 (* angle (PI)))))))) a)) (* 1/4 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))) a)) (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))))> |
#<alt (* -1 (* a (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (/ (* x-scale (+ (* -1 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 b) (* 2 b))))))) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* 4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (+ (* -2 b) (* 2 b)))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))))) a)) (* x-scale (+ (* 1/8 (+ (* -1/2 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (* 1/8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (cos (* 1/180 (* angle (PI))))))))) a)) (* 1/4 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))) a)) (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))))> |
#<alt (* 1/4 (* (* (sqrt 2) (sqrt 8)) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))> |
#<alt (+ (* 1/8 (* (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* 1/4 (* (* (sqrt 2) (sqrt 8)) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))> |
#<alt (+ (* 1/8 (* (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* 1/4 (* (* (sqrt 2) (sqrt 8)) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))> |
#<alt (+ (* 1/8 (* (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* 1/4 (* (* (sqrt 2) (sqrt 8)) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))> |
#<alt (* 1/8 (* (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))> |
#<alt (* (pow y-scale 2) (+ (* 1/8 (* (/ (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* 1/4 (* (/ (* (sqrt 2) (sqrt 8)) (pow y-scale 2)) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))> |
#<alt (* (pow y-scale 2) (+ (* 1/8 (* (/ (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* 1/4 (* (/ (* (sqrt 2) (sqrt 8)) (pow y-scale 2)) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))> |
#<alt (* (pow y-scale 2) (+ (* 1/8 (* (/ (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* 1/4 (* (/ (* (sqrt 2) (sqrt 8)) (pow y-scale 2)) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))> |
#<alt (* -1/8 (* (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))> |
#<alt (* (pow y-scale 2) (+ (* -1/4 (* (/ (* (sqrt 2) (sqrt 8)) (pow y-scale 2)) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* -1/8 (* (/ (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))> |
#<alt (* (pow y-scale 2) (+ (* -1/4 (* (/ (* (sqrt 2) (sqrt 8)) (pow y-scale 2)) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* -1/8 (* (/ (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))> |
#<alt (* (pow y-scale 2) (+ (* -1/4 (* (/ (* (sqrt 2) (sqrt 8)) (pow y-scale 2)) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* -1/8 (* (/ (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))> |
#<alt (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (* 1/4 (* a (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))> |
#<alt (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (+ (* 1/4 (* a (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* b (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))))))) (* (pow a 3) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))))))> |
#<alt (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (+ (* 1/4 (* a (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* b (+ (* 1/4 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))))) (* (pow a 3) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (* b (+ (* 1/8 (+ (* -1/2 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow a 3) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 3))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))))) (* 1/8 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))) (* a (cos (* 1/180 (* angle (PI)))))))))))))> |
#<alt (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (+ (* 1/4 (* a (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* b (+ (* 1/4 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))))) (* (pow a 3) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (* b (+ (* 1/8 (* b (+ (* -1 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))))) (* (pow a 5) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 3))))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (pow a 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))))))) (+ (* 1/8 (+ (* -1/2 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow a 3) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 3))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))))) (* 1/8 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))) (* a (cos (* 1/180 (* angle (PI))))))))))))))> |
#<alt (* b (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))> |
#<alt (* b (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))))))> |
#<alt (* b (+ (* 1/8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (* (pow b 2) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/8 (/ (+ (* -1/2 (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (pow b 2))) (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))))))))> |
#<alt (* b (+ (* 1/8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (* (pow b 2) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/8 (/ (+ (* -1 (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 a) (* 2 a))))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* 4 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (+ (* -2 a) (* 2 a)))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (pow b 3))) (+ (* 1/8 (/ (+ (* -1/2 (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (pow b 2))) (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))))))))))> |
#<alt (* -1 (* b (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))> |
#<alt (* -1 (* b (+ (* -1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))> |
#<alt (* -1 (* b (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/8 (+ (* -1/2 (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (sin (* 1/180 (* angle (PI))))))) b)) (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) b)) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))> |
#<alt (* -1 (* b (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (/ (+ (* -1 (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 a) (* 2 a))))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* 4 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (+ (* -2 a) (* 2 a)))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) b)) (+ (* 1/8 (+ (* -1/2 (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (sin (* 1/180 (* angle (PI)))))))) b)) (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) b)) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))> |
#<alt (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (pow b 2)) (pow b 2))))) (* a (pow x-scale 2)))) (* 1/4 (* a (* (sqrt 2) (sqrt 8)))))> |
#<alt (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (pow b 2)) (pow b 2))))) (* a (pow x-scale 2)))) (+ (* 1/4 (* a (* (sqrt 2) (sqrt 8)))) (* (pow angle 2) (+ (* 1/8 (+ (* -1/2 (/ (* (pow y-scale 4) (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1 (pow b 2)) (pow b 2)) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))))) (* (pow a 3) (pow x-scale 2)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))))))) (* a (pow x-scale 2))))) (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 2) (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))))) a))))))> |
#<alt (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (pow b 2)) (pow b 2))))) (* a (pow x-scale 2)))) (+ (* 1/4 (* a (* (sqrt 2) (sqrt 8)))) (* (pow angle 2) (+ (* 1/8 (+ (* -1/2 (/ (* (pow y-scale 4) (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1 (pow b 2)) (pow b 2)) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))))) (* (pow a 3) (pow x-scale 2)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))))))) (* a (pow x-scale 2))))) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 2) (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))))) a)) (* (pow angle 2) (+ (* 1/8 (+ (* -1/2 (/ (* a (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (+ (* 1/4 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (/ (* (pow y-scale 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (pow a 4)))) (+ (* -1 (pow b 2)) (pow b 2)))))) (pow x-scale 2))) (+ (* -1/2 (/ (* (pow y-scale 4) (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2))))))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))))) (* (pow a 3) (pow x-scale 2)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (+ (* (pow b 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 2))))) (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))))) (pow a 2)) (+ (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))) (pow a 2))) (/ (* (pow y-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))) (pow a 2))))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))) (* a (pow x-scale 2)))))) (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 2) (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 2))))))) a)))))))))> |
#<alt (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (pow b 2)) (pow b 2))))) (* a (pow x-scale 2)))) (+ (* 1/4 (* a (* (sqrt 2) (sqrt 8)))) (* (pow angle 2) (+ (* 1/8 (+ (* -1/2 (/ (* (pow y-scale 4) (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1 (pow b 2)) (pow b 2)) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))))) (* (pow a 3) (pow x-scale 2)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))))))) (* a (pow x-scale 2))))) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 2) (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))))) a)) (* (pow angle 2) (+ (* 1/8 (+ (* -1/2 (/ (* a (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (+ (* 1/4 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (/ (* (pow y-scale 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (pow a 4)))) (+ (* -1 (pow b 2)) (pow b 2)))))) (pow x-scale 2))) (+ (* -1/2 (/ (* (pow y-scale 4) (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2))))))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))))) (* (pow a 3) (pow x-scale 2)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (+ (* (pow b 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 2))))) (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))))) (pow a 2)) (+ (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))) (pow a 2))) (/ (* (pow y-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))) (pow a 2))))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))) (* a (pow x-scale 2)))))) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 2) (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 2))))))) a)) (* (pow angle 2) (+ (* 1/8 (+ (* -1/2 (/ (* a (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1 (/ (* (pow y-scale 2) (* (+ (* -1 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (/ (* (pow y-scale 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (pow a 4))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2))) (+ (* -1 (/ (* (pow y-scale 6) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))) (pow a 6))) (+ (* 1/2 (/ (* (pow y-scale 2) (* (+ (* -1 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (+ (* 1/4 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (/ (* (pow y-scale 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (pow a 4)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2))) (/ (* (pow y-scale 4) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (pow a 4))))) (+ (* -1 (pow b 2)) (pow b 2)))))) (pow x-scale 2))) (+ (* -1/2 (/ (* a (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (+ (* 1/4 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (/ (* (pow y-scale 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (pow a 4)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2))))))))))) (pow x-scale 2))) (+ (* -1/2 (/ (* (pow y-scale 4) (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (+ (* (pow b 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 2))))) (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))))) (pow a 2)) (+ (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))) (pow a 2))) (/ (* (pow y-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))) (pow a 2))))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))))))) (* (pow a 3) (pow x-scale 2)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (+ (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (+ (* (pow b 2) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))))) (pow y-scale 2)))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- b a) 2)))) (pow y-scale 2))) (/ (* (pow (+ a b) 2) (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- b a) 2))) (pow y-scale 2))))))) (pow a 2)) (+ (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))))) (pow a 2))) (+ (/ (* (pow y-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (+ (* (pow b 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 2))))) (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))))) (pow a 2)) (+ (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))) (pow a 2))) (/ (* (pow y-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))) (pow a 2)))))) (pow a 2)) (/ (* (pow y-scale 2) (* (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))) (pow a 2)))))) (+ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6))))))))) (* a (pow x-scale 2))))))) (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 2) (* (sqrt 8) (- (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 2)))))) (pow a 2))))))) a))))))))))))> |
#<alt (+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))> |
#<alt (+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))> |
#<alt (+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))> |
#<alt (+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))> |
#<alt (+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))> |
#<alt (+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))> |
#<alt (+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))> |
#<alt (+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))> |
#<alt (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/4 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))> |
#<alt (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (+ (* 1/4 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* a (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))))))) (* (pow b 3) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))))))> |
#<alt (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (+ (* 1/4 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* a (+ (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))))) (* (pow b 3) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* a (+ (* 1/8 (+ (* -1/2 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow b 3) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))))) (* 1/8 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))) (* b (sin (* 1/180 (* angle (PI)))))))))))))> |
#<alt (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (+ (* 1/4 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* a (+ (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))))) (* (pow b 3) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* a (+ (* 1/8 (* a (+ (* -1 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))))) (* (pow b 5) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (pow b 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))))))) (+ (* 1/8 (+ (* -1/2 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow b 3) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))))) (* 1/8 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))) (* b (sin (* 1/180 (* angle (PI))))))))))))))> |
#<alt (* a (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))> |
#<alt (* a (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (+ (* 1/4 (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))))))> |
#<alt (* a (+ (* 1/8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (* (pow a 2) (cos (* 1/180 (* angle (PI))))))) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (+ (* 1/8 (/ (+ (* -1/2 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/4 (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))))))))> |
#<alt (* a (+ (* 1/8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (* (pow a 2) (cos (* 1/180 (* angle (PI))))))) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (+ (* 1/8 (/ (+ (* -1 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 b) (* 2 b))))))) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* 4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (+ (* -2 b) (* 2 b)))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (pow a 3))) (+ (* 1/8 (/ (+ (* -1/2 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/4 (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))))))))))> |
#<alt (* -1 (* a (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))> |
#<alt (* -1 (* a (+ (* -1/4 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))> |
#<alt (* -1 (* a (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/8 (+ (* -1/2 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (* 1/8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (cos (* 1/180 (* angle (PI))))))) a)) (* 1/4 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) a)) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))> |
#<alt (* -1 (* a (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (/ (+ (* -1 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 b) (* 2 b))))))) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* 4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (+ (* -2 b) (* 2 b)))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) a)) (+ (* 1/8 (+ (* -1/2 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (* 1/8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (cos (* 1/180 (* angle (PI)))))))) a)) (* 1/4 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) a)) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))> |
#<alt (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))> |
#<alt (/ (+ (* 1/8 (* (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* (pow x-scale 2) (* y-scale (* (sqrt 2) (sqrt 8)))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow x-scale 2))> |
#<alt (/ (+ (* 1/8 (* (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* (pow x-scale 2) (* y-scale (* (sqrt 2) (sqrt 8)))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow x-scale 2))> |
#<alt (/ (+ (* 1/8 (* (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* (pow x-scale 2) (* y-scale (* (sqrt 2) (sqrt 8)))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow x-scale 2))> |
#<alt (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))> |
#<alt (+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))> |
#<alt (+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))> |
#<alt (+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))> |
#<alt (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))> |
#<alt (+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))> |
#<alt (+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))> |
#<alt (+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))> |
#<alt (* b (sqrt 2))> |
#<alt (+ (* 1/2 (/ (* (pow angle 2) (* (sqrt 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))))) b)) (* b (sqrt 2)))> |
#<alt (+ (* b (sqrt 2)) (* (pow angle 2) (+ (* 1/2 (/ (* (sqrt 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) b)) (* 1/2 (/ (* (pow angle 2) (* (sqrt 2) (- (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (* 1/4 (/ (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2) (pow b 2)))))) b)))))> |
#<alt (+ (* b (sqrt 2)) (* (pow angle 2) (+ (* 1/2 (/ (* (sqrt 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) b)) (* (pow angle 2) (+ (* 1/2 (/ (* (sqrt 2) (- (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (* 1/4 (/ (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2) (pow b 2))))) b)) (* 1/2 (/ (* (pow angle 2) (* (sqrt 2) (- (+ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6))))) (* 1/2 (/ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (- (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (* 1/4 (/ (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2) (pow b 2))))) (pow b 2)))))) b)))))))> |
#<alt (* (sqrt 2) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))> |
#<alt (* (sqrt 2) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))> |
#<alt (* (sqrt 2) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))> |
#<alt (* (sqrt 2) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))> |
#<alt (* (sqrt 2) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))> |
#<alt (* (sqrt 2) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))> |
#<alt (* (sqrt 2) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))> |
#<alt (* (sqrt 2) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))> |
#<alt (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))> |
#<alt (+ (* 1/2 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (sqrt 2))) (* a (sin (* 1/180 (* angle (PI))))))) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))> |
#<alt (+ (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))) (* (pow b 2) (+ (* -1/8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (sqrt 2))) (* (pow a 3) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* 1/2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (sqrt 2)) (* a (sin (* 1/180 (* angle (PI))))))))))> |
#<alt (+ (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))) (* (pow b 2) (+ (* 1/2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (sqrt 2)) (* a (sin (* 1/180 (* angle (PI))))))) (* (pow b 2) (+ (* -1/8 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (sqrt 2)) (* (pow a 3) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* 1/16 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 6) (sqrt 2))) (* (pow a 5) (pow (sin (* 1/180 (* angle (PI)))) 5)))))))))> |
#<alt (* b (* (cos (* 1/180 (* angle (PI)))) (sqrt 2)))> |
#<alt (* b (+ (* 1/2 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 2))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* (cos (* 1/180 (* angle (PI)))) (sqrt 2))))> |
#<alt (* b (+ (* -1/8 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 2))) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/2 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 2))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* (cos (* 1/180 (* angle (PI)))) (sqrt 2)))))> |
#<alt (* b (+ (* -1/8 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 2))) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/16 (/ (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (sqrt 2))) (* (pow b 6) (pow (cos (* 1/180 (* angle (PI)))) 5)))) (+ (* 1/2 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 2))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* (cos (* 1/180 (* angle (PI)))) (sqrt 2))))))> |
#<alt (* -1 (* b (* (cos (* 1/180 (* angle (PI)))) (sqrt 2))))> |
#<alt (* -1 (* b (+ (* 1/2 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 2))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* (cos (* 1/180 (* angle (PI)))) (sqrt 2)))))> |
#<alt (* -1 (* b (+ (* -1/8 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 2))) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/2 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 2))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* (cos (* 1/180 (* angle (PI)))) (sqrt 2))))))> |
#<alt (* -1 (* b (+ (* -1/8 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 2))) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/16 (/ (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (sqrt 2))) (* (pow b 6) (pow (cos (* 1/180 (* angle (PI)))) 5)))) (+ (* 1/2 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 2))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* (cos (* 1/180 (* angle (PI)))) (sqrt 2)))))))> |
#<alt (* b (* (cos (* 1/180 (* angle (PI)))) (sqrt 2)))> |
#<alt (+ (* 1/2 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 2))) (* b (cos (* 1/180 (* angle (PI))))))) (* b (* (cos (* 1/180 (* angle (PI)))) (sqrt 2))))> |
#<alt (+ (* b (* (cos (* 1/180 (* angle (PI)))) (sqrt 2))) (* (pow a 2) (+ (* -1/8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 2))) (* (pow b 3) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (* 1/2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 2)) (* b (cos (* 1/180 (* angle (PI))))))))))> |
#<alt (+ (* b (* (cos (* 1/180 (* angle (PI)))) (sqrt 2))) (* (pow a 2) (+ (* 1/2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 2)) (* b (cos (* 1/180 (* angle (PI))))))) (* (pow a 2) (+ (* -1/8 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 2)) (* (pow b 3) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (* 1/16 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (sqrt 2))) (* (pow b 5) (pow (cos (* 1/180 (* angle (PI)))) 5)))))))))> |
#<alt (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))> |
#<alt (* a (+ (* 1/2 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (sqrt 2))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))> |
#<alt (* a (+ (* -1/8 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (sqrt 2))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/2 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (sqrt 2))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))> |
#<alt (* a (+ (* -1/8 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (sqrt 2))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/16 (/ (* (pow b 6) (* (pow (cos (* 1/180 (* angle (PI)))) 6) (sqrt 2))) (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 5)))) (+ (* 1/2 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (sqrt 2))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))> |
#<alt (* -1 (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))> |
#<alt (* -1 (* a (+ (* 1/2 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (sqrt 2))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))> |
#<alt (* -1 (* a (+ (* -1/8 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (sqrt 2))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/2 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (sqrt 2))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))> |
#<alt (* -1 (* a (+ (* -1/8 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (sqrt 2))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/16 (/ (* (pow b 6) (* (pow (cos (* 1/180 (* angle (PI)))) 6) (sqrt 2))) (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 5)))) (+ (* 1/2 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (sqrt 2))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))> |
#<alt 1> |
#<alt (+ 1 (* -1/64800 (* (pow angle 2) (pow (PI) 2))))> |
#<alt (+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* 1/25194240000 (* (pow angle 2) (pow (PI) 4))))))> |
#<alt (+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/24488801280000000 (* (pow angle 2) (pow (PI) 6))) (* 1/25194240000 (pow (PI) 4)))))))> |
#<alt (cos (* 1/180 (* angle (PI))))> |
#<alt (cos (* 1/180 (* angle (PI))))> |
#<alt (cos (* 1/180 (* angle (PI))))> |
#<alt (cos (* 1/180 (* angle (PI))))> |
#<alt (cos (* 1/180 (* angle (PI))))> |
#<alt (cos (* 1/180 (* angle (PI))))> |
#<alt (cos (* 1/180 (* angle (PI))))> |
#<alt (cos (* 1/180 (* angle (PI))))> |
#<alt (* 1/180 (* angle (PI)))> |
#<alt (* angle (+ (* -1/34992000 (* (pow angle 2) (pow (PI) 3))) (* 1/180 (PI))))> |
#<alt (* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* 1/22674816000000 (* (pow angle 2) (pow (PI) 5)))))))> |
#<alt (* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* (pow angle 2) (+ (* -1/30855889612800000000 (* (pow angle 2) (pow (PI) 7))) (* 1/22674816000000 (pow (PI) 5))))))))> |
#<alt (sin (* 1/180 (* angle (PI))))> |
#<alt (sin (* 1/180 (* angle (PI))))> |
#<alt (sin (* 1/180 (* angle (PI))))> |
#<alt (sin (* 1/180 (* angle (PI))))> |
#<alt (sin (* 1/180 (* angle (PI))))> |
#<alt (sin (* 1/180 (* angle (PI))))> |
#<alt (sin (* 1/180 (* angle (PI))))> |
#<alt (sin (* 1/180 (* angle (PI))))> |
#<alt (* y-scale (sqrt 2))> |
#<alt (* y-scale (sqrt 2))> |
#<alt (* y-scale (sqrt 2))> |
#<alt (* y-scale (sqrt 2))> |
#<alt (* y-scale (sqrt 2))> |
#<alt (* y-scale (sqrt 2))> |
#<alt (* y-scale (sqrt 2))> |
#<alt (* y-scale (sqrt 2))> |
#<alt (* y-scale (sqrt 2))> |
#<alt (* y-scale (sqrt 2))> |
#<alt (* y-scale (sqrt 2))> |
#<alt (* y-scale (sqrt 2))> |
#<alt (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))> |
#<alt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* 1/2 (* (* (pow a 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))> |
#<alt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* (pow a 2) (+ (* 1/2 (* (* (pow a 2) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))))> |
#<alt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* (pow a 2) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow a 2) (+ (* -1/4 (* (* (pow a 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))))))> |
#<alt (* (pow a 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))> |
#<alt (* (pow a 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))> |
#<alt (* (pow a 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow a 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))> |
#<alt (* (pow a 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* -1/4 (* (/ (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (pow a 6)) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow a 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))))> |
#<alt (* (pow a 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))> |
#<alt (* (pow a 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))> |
#<alt (* (pow a 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow a 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))> |
#<alt (* (pow a 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* -1/4 (* (/ (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (pow a 6)) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow a 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))))> |
#<alt (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))> |
#<alt (- (+ (* 1/2 (/ (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (pow b 2) (pow x-scale 2))) (/ (pow a 2) (pow y-scale 2)))> |
#<alt (- (+ (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))) (/ (pow b 2) (pow x-scale 2))) (/ (pow a 2) (pow y-scale 2)))> |
#<alt (- (+ (* (pow angle 2) (+ (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (/ (pow b 2) (pow x-scale 2))) (/ (pow a 2) (pow y-scale 2)))> |
#<alt (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)))> |
#<alt (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)))> |
#<alt (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)))> |
#<alt (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)))> |
#<alt (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)))> |
#<alt (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)))> |
#<alt (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)))> |
#<alt (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)))> |
#<alt (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))> |
#<alt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* 1/2 (* (* (pow b 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))> |
#<alt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* (pow b 2) (+ (* 1/2 (* (* (pow b 2) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))))> |
#<alt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* (pow b 2) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow b 2) (+ (* -1/4 (* (* (pow b 2) (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))))))> |
#<alt (* (pow b 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))> |
#<alt (* (pow b 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))> |
#<alt (* (pow b 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow b 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))> |
#<alt (* (pow b 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* -1/4 (* (/ (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (pow b 6)) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow b 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))))> |
#<alt (* (pow b 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))> |
#<alt (* (pow b 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))> |
#<alt (* (pow b 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow b 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))> |
#<alt (* (pow b 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* -1/4 (* (/ (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (pow b 6)) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow b 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))))> |
#<alt (/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))> |
#<alt (/ (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))> |
#<alt (/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (+ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))) (pow x-scale 2))> |
#<alt (/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (+ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))))) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))) (pow x-scale 2))> |
#<alt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))> |
#<alt (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))> |
#<alt (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (* (pow x-scale 4) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))> |
#<alt (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 6) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (* (pow x-scale 4) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))> |
#<alt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))> |
#<alt (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))> |
#<alt (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (* (pow x-scale 4) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))> |
#<alt (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 6) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (* (pow x-scale 4) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))> |
#<alt (/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))> |
#<alt (/ (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))> |
#<alt (/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (+ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow y-scale 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (pow y-scale 2))> |
#<alt (/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (+ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow y-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))) (pow y-scale 2))> |
#<alt (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))> |
#<alt (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))> |
#<alt (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (* (pow y-scale 4) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))> |
#<alt (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 6) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (* (pow y-scale 4) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))> |
#<alt (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))> |
#<alt (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))> |
#<alt (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (* (pow y-scale 4) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))> |
#<alt (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 6) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (* (pow y-scale 4) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))> |
#<alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt 1> |
#<alt (+ 1 (* -1/64800 (* (pow angle 2) (pow (PI) 2))))> |
#<alt (+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* 1/25194240000 (* (pow angle 2) (pow (PI) 4))))))> |
#<alt (+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/24488801280000000 (* (pow angle 2) (pow (PI) 6))) (* 1/25194240000 (pow (PI) 4)))))))> |
#<alt (cos (* 1/180 (* angle (PI))))> |
#<alt (cos (* 1/180 (* angle (PI))))> |
#<alt (cos (* 1/180 (* angle (PI))))> |
#<alt (cos (* 1/180 (* angle (PI))))> |
#<alt (cos (* 1/180 (* angle (PI))))> |
#<alt (cos (* 1/180 (* angle (PI))))> |
#<alt (cos (* 1/180 (* angle (PI))))> |
#<alt (cos (* 1/180 (* angle (PI))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))> |
#<alt (+ (* 1/16 (* (/ (* a (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))> |
#<alt (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))) (* a (+ (* 1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* 1/8 (* (* a (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (+ (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (sqrt (/ 1 (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))))> |
#<alt (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))) (* a (+ (* 1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* a (+ (* 1/8 (* (* a (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 (pow b 3)) (* 2 (pow b 3))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (* 1/4 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 (pow b 3)) (* 2 (pow b 3))) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (+ (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))) (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (+ (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))) (sqrt (/ 1 (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))))))> |
#<alt (* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))> |
#<alt (* a (+ (* 1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))) (* a (* x-scale y-scale))) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))))> |
#<alt (* a (+ (* 1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))) (* a (* x-scale y-scale))) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))))))) (pow a 2)) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))))> |
#<alt (* a (+ (* 1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))) (* a (* x-scale y-scale))) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 b) (* 2 b)) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (* 1/4 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 b) (* 2 b)) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))))))) (pow a 3)) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))))))) (pow a 2)) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))))))> |
#<alt (* -1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))> |
#<alt (* -1 (* a (+ (* -1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))) (* a (* x-scale y-scale))) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))))> |
#<alt (* -1 (* a (+ (* -1 (/ (+ (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))))))) a) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))) (* 1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))))) a)) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))))> |
#<alt (* -1 (* a (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 b) (* 2 b)) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (* 1/4 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 b) (* 2 b)) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))))))) a) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))) (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))))))) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) a)) (* 1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))))) a)) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))> |
#<alt (+ (* 1/16 (* (/ (* b (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))> |
#<alt (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* b (+ (* 1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* 1/8 (* (* b (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (+ (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (sqrt (/ 1 (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))))> |
#<alt (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* b (+ (* 1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* b (+ (* 1/8 (* (* b (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 (pow a 3)) (* 2 (pow a 3))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (* 1/4 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 (pow a 3)) (* 2 (pow a 3))) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (+ (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (+ (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (sqrt (/ 1 (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))))))> |
#<alt (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))> |
#<alt (* b (+ (* 1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))) (* b (* x-scale y-scale))) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))))> |
#<alt (* b (+ (* 1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))) (* b (* x-scale y-scale))) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))))))) (pow b 2)) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))))> |
#<alt (* b (+ (* 1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))) (* b (* x-scale y-scale))) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 a) (* 2 a)) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (* 1/4 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 a) (* 2 a)) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))))))) (pow b 3)) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))))))) (pow b 2)) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))))))> |
#<alt (* -1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))> |
#<alt (* -1 (* b (+ (* -1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))) (* b (* x-scale y-scale))) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))))> |
#<alt (* -1 (* b (+ (* -1 (/ (+ (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))))))) b) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (* 1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))))) b)) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))))> |
#<alt (* -1 (* b (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 a) (* 2 a)) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (* 1/4 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 a) (* 2 a)) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))))))) b) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))))))) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) b)) (* 1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))))) b)) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))))> |
#<alt (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))> |
#<alt (+ (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))> |
#<alt (+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))))> |
#<alt (+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))> |
#<alt (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))> |
#<alt (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))))> |
#<alt (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))) (pow x-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))))> |
#<alt (* -1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))> |
#<alt (* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))))> |
#<alt (* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))))> |
#<alt (* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))) (pow x-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))))))> |
#<alt (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))> |
#<alt (+ (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))> |
#<alt (+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))))> |
#<alt (+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))> |
#<alt (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))> |
#<alt (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))))> |
#<alt (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))) (pow y-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))))> |
#<alt (* -1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))> |
#<alt (* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))))> |
#<alt (* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))))> |
#<alt (* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))) (pow y-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))))))> |
#<alt (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))> |
#<alt (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))))))) (* b (sqrt 2)))) (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))))> |
#<alt (+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/2 (/ (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))))) (* b (sqrt 2)))))))> |
#<alt (+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))))) (* b (sqrt 2)))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow y-scale 2))) (+ (* -1/765275040000000 (/ (* (pow b 2) (pow (PI) 6)) (pow x-scale 2))) (+ (* 1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow x-scale 2))) (+ (* 1/765275040000000 (/ (* (pow b 2) (pow (PI) 6)) (pow y-scale 2))) (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))))) (+ (* 2 (* (- (+ (* -1/765275040000000 (/ (* (pow b 2) (pow (PI) 6)) (pow x-scale 2))) (* 1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow x-scale 2)))) (+ (* -1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow y-scale 2))) (* 1/765275040000000 (/ (* (pow b 2) (pow (PI) 6)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow (+ a b) 2) (* (+ (* 1/31886460000000 (pow (PI) 6)) (* 1/19131876000000 (pow (PI) 6))) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (* 1/2 (/ (* (pow x-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/2 (/ (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/2 (/ (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2)))))))) (* b (sqrt 2)))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))> |
#<alt (* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* 1/90 (* angle (PI)))> |
#<alt (* angle (+ (* -1/4374000 (* (pow angle 2) (pow (PI) 3))) (* 1/90 (PI))))> |
#<alt (* angle (+ (* 1/90 (PI)) (* (pow angle 2) (+ (* -1/4374000 (pow (PI) 3)) (* 1/708588000000 (* (pow angle 2) (pow (PI) 5)))))))> |
#<alt (* angle (+ (* 1/90 (PI)) (* (pow angle 2) (+ (* -1/4374000 (pow (PI) 3)) (* (pow angle 2) (+ (* -1/241061637600000000 (* (pow angle 2) (pow (PI) 7))) (* 1/708588000000 (pow (PI) 5))))))))> |
#<alt (sin (* 1/90 (* angle (PI))))> |
#<alt (sin (* 1/90 (* angle (PI))))> |
#<alt (sin (* 1/90 (* angle (PI))))> |
#<alt (sin (* 1/90 (* angle (PI))))> |
#<alt (sin (* 1/90 (* angle (PI))))> |
#<alt (sin (* 1/90 (* angle (PI))))> |
#<alt (sin (* 1/90 (* angle (PI))))> |
#<alt (sin (* 1/90 (* angle (PI))))> |
#<alt 1> |
#<alt (+ 1 (* -1/16200 (* (pow angle 2) (pow (PI) 2))))> |
#<alt (+ 1 (* (pow angle 2) (+ (* -1/16200 (pow (PI) 2)) (* 1/1574640000 (* (pow angle 2) (pow (PI) 4))))))> |
#<alt (+ 1 (* (pow angle 2) (+ (* -1/16200 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/382637520000000 (* (pow angle 2) (pow (PI) 6))) (* 1/1574640000 (pow (PI) 4)))))))> |
#<alt (cos (* 1/90 (* angle (PI))))> |
#<alt (cos (* 1/90 (* angle (PI))))> |
#<alt (cos (* 1/90 (* angle (PI))))> |
#<alt (cos (* 1/90 (* angle (PI))))> |
#<alt (cos (* 1/90 (* angle (PI))))> |
#<alt (cos (* 1/90 (* angle (PI))))> |
#<alt (cos (* 1/90 (* angle (PI))))> |
#<alt (cos (* 1/90 (* angle (PI))))> |
#<alt (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))> |
#<alt (+ (* 4 (/ (* b (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (pow a 2))) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))> |
#<alt (+ (* b (+ (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (pow a 2))) (* b (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))> |
#<alt (+ (* b (+ (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (pow a 2))) (* b (- (+ (* b (- (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (pow a 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))> |
#<alt (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2))> |
#<alt (* (pow b 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) b)) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))> |
#<alt (* (pow b 2) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) b)) (+ (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)))))> |
#<alt (* (pow b 2) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) b)) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (pow b 3))) (+ (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* 4 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (+ (* -2 a) (* 2 a)))) (* (pow b 3) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4))))))> |
#<alt (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2))> |
#<alt (* (pow b 2) (+ (* -4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) b)) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))> |
#<alt (* (pow b 2) (+ (* -1 (/ (+ (* -1 (/ (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) b)) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))))) b)) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))> |
#<alt (* (pow b 2) (+ (* -1 (/ (+ (* -1 (/ (- (+ (* -1 (/ (- (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* 4 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (+ (* -2 a) (* 2 a)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) b)) (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) b)) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))))) b)) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))> |
#<alt (* -2 (pow b 2))> |
#<alt (+ (* -2 (pow b 2)) (* (pow angle 2) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2))))))> |
#<alt (+ (* -2 (pow b 2)) (* (pow angle 2) (- (+ (* (pow angle 2) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (+ (* (pow b 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 2))))) (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))))) (pow a 2)) (+ (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))) (pow a 2))) (/ (* (pow y-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))) (pow a 2))))) (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2))) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2))))))> |
#<alt (+ (* -2 (pow b 2)) (* (pow angle 2) (- (+ (* (pow angle 2) (- (+ (* (pow angle 2) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (+ (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (+ (* (pow b 2) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))))) (pow y-scale 2)))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- b a) 2)))) (pow y-scale 2))) (/ (* (pow (+ a b) 2) (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- b a) 2))) (pow y-scale 2))))))) (pow a 2)) (+ (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))))) (pow a 2))) (+ (/ (* (pow y-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (+ (* (pow b 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 2))))) (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))))) (pow a 2)) (+ (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))) (pow a 2))) (/ (* (pow y-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))) (pow a 2)))))) (pow a 2)) (/ (* (pow y-scale 2) (* (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))) (pow a 2)))))) (/ (* (pow y-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (+ (* (pow b 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 2))))) (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))))) (pow a 2))) (+ (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))) (pow a 2))) (/ (* (pow y-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))) (pow a 2))))) (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2))) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2))))))> |
#<alt (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))> |
#<alt (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))> |
#<alt (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))> |
#<alt (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))> |
#<alt (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))> |
#<alt (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))> |
#<alt (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))> |
#<alt (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))> |
#<alt (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))> |
#<alt (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))> |
#<alt (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))> |
#<alt (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))> |
#<alt (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))> |
#<alt (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))> |
#<alt (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))> |
#<alt (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))> |
#<alt (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))> |
#<alt (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))> |
#<alt (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))> |
#<alt (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))> |
#<alt (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))> |
#<alt (+ (* 4 (/ (* a (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (pow b 2))) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))> |
#<alt (+ (* a (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (pow b 2))) (* a (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))> |
#<alt (+ (* a (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (pow b 2))) (* a (- (+ (* a (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (pow b 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))> |
#<alt (/ (* (pow a 2) (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (pow (cos (* 1/180 (* angle (PI)))) 2))> |
#<alt (* (pow a 2) (+ (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) a)) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))))> |
#<alt (* (pow a 2) (- (+ (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) a)) (+ (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)))))> |
#<alt (* (pow a 2) (- (+ (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) a)) (+ (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (pow a 3))) (+ (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (* 4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (+ (* -2 b) (* 2 b)))) (* (pow a 3) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4))))))> |
#<alt (/ (* (pow a 2) (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (pow (cos (* 1/180 (* angle (PI)))) 2))> |
#<alt (* (pow a 2) (+ (* -4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) a)) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))))> |
#<alt (* (pow a 2) (+ (* -1 (/ (+ (* -1 (/ (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (cos (* 1/180 (* angle (PI)))) 4))) a)) (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))))) a)) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))))> |
#<alt (* (pow a 2) (+ (* -1 (/ (+ (* -1 (/ (- (+ (* -1 (/ (- (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* 4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (+ (* -2 b) (* 2 b)))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) a)) (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (cos (* 1/180 (* angle (PI)))) 4))) a)) (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))))) a)) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))))> |
#<alt (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))> |
#<alt (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (+ (* 4 (/ (* b (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))> |
#<alt (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* b (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (pow y-scale 2))) (* b (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2)))))))))> |
#<alt (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* b (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (pow y-scale 2))) (* b (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (+ (* 4 (/ (* b (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))))) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))))))))> |
#<alt (* (pow b 4) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))> |
#<alt (* (pow b 4) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (* b (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))> |
#<alt (* (pow b 4) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (pow b 2))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow b 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (* b (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))> |
#<alt (* (pow b 4) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (pow b 2))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow b 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (* b (pow y-scale 2)))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* (pow b 3) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))> |
#<alt (* (pow b 4) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))> |
#<alt (* (pow b 4) (+ (* -4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (* b (pow y-scale 2)))) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))> |
#<alt (* (pow b 4) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (* -1 (/ (+ (* -1 (/ (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2)))) b)) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (pow y-scale 2)))) b)) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))> |
#<alt (* (pow b 4) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (* -1 (/ (+ (* -1 (/ (+ (* -4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* b (pow y-scale 2)))) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) b)) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (pow y-scale 2)))) b)) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))> |
#<alt (* -2 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2)))> |
#<alt (+ (* -2 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))))> |
#<alt (+ (* -2 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* (pow angle 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (+ (* (pow b 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 2))))) (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))))))))))> |
#<alt (+ (* -2 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* (pow angle 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (+ (* (pow b 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow angle 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (+ (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (+ (* (pow b 2) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))))) (pow y-scale 2)))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- b a) 2)))) (pow y-scale 2))) (/ (* (pow (+ a b) 2) (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- b a) 2))) (pow y-scale 2))))))))))))))> |
#<alt (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2))))> |
#<alt (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2))))> |
#<alt (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2))))> |
#<alt (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2))))> |
#<alt (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2))))> |
#<alt (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2))))> |
#<alt (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2))))> |
#<alt (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2))))> |
#<alt (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (pow y-scale 2))> |
#<alt (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (pow y-scale 2))> |
#<alt (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (pow y-scale 2))> |
#<alt (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (pow y-scale 2))> |
#<alt (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (pow y-scale 2))> |
#<alt (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (pow y-scale 2))> |
#<alt (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (pow y-scale 2))> |
#<alt (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (pow y-scale 2))> |
#<alt (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (pow y-scale 2))> |
#<alt (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (pow y-scale 2))> |
#<alt (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (pow y-scale 2))> |
#<alt (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (pow y-scale 2))> |
#<alt (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))> |
#<alt (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (+ (* 4 (/ (* a (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))> |
#<alt (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* a (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (pow y-scale 2))) (* a (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2)))))))))> |
#<alt (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* a (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (pow y-scale 2))) (* a (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (+ (* 4 (/ (* a (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))))) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))))))))> |
#<alt (* (pow a 4) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))> |
#<alt (* (pow a 4) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (* a (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))> |
#<alt (* (pow a 4) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (pow a 2))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow a 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (* a (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))> |
#<alt (* (pow a 4) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (pow a 2))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow a 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (* a (pow y-scale 2)))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* (pow a 3) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))> |
#<alt (* (pow a 4) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))> |
#<alt (* (pow a 4) (+ (* -4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (* a (pow y-scale 2)))) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))> |
#<alt (* (pow a 4) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (* -1 (/ (+ (* -1 (/ (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2)))) a)) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (pow y-scale 2)))) a)) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))> |
#<alt (* (pow a 4) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (* -1 (/ (+ (* -1 (/ (+ (* -4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* a (pow y-scale 2)))) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) a)) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (pow y-scale 2)))) a)) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))> |
297 calls:
| Time | Variable | Point | Expression | |
|---|---|---|---|---|
| 63.0ms | angle | @ | 0 | (* x-scale (+ (* 1/8 (/ (* (* (* y-scale (sqrt 8)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (/ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (* (+ b a) (- b a)) (* (+ b a) (- b a)))))) (* y-scale y-scale))) (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (sqrt (/ 1 (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (* x-scale x-scale))) (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale)))))))) |
| 40.0ms | x-scale | @ | 0 | (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale))))) |
| 34.0ms | y-scale | @ | inf | (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale))))) |
| 21.0ms | angle | @ | 0 | (sin (* 2 (* (* angle (PI)) 1/180))) |
| 20.0ms | a | @ | inf | (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) |
| 1× | egg-herbie |
| 8 128× | lower-*.f64 |
| 8 128× | lower-*.f32 |
| 4 746× | lower-+.f64 |
| 4 746× | lower-+.f32 |
| 3 922× | lower-fma.f64 |
Useful iterations: 0 (0.0ms)
| Iter | Nodes | Cost |
|---|---|---|
| 0 | 3869 | 344342 |
| 0 | 8022 | 337326 |
| 1× | iter limit |
| 1× | node limit |
| Inputs |
|---|
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(+ (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))))) |
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) |
(* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))) |
(* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) |
(* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))))) |
(* -1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) |
(* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) |
(* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))))) |
(* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(+ (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))))) |
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) |
(* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) |
(* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) |
(* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))) |
(* -1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) |
(* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) |
(* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))) |
(* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))))) |
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) |
(+ (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) |
(+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))) |
(+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) |
(* -1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) |
(* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) |
(* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))))) |
(* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) |
(+ (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) |
(+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))) |
(+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) |
(* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) |
(* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) |
(* -1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) |
(* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) |
(* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))))) |
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) |
(+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))))))) (* b (sqrt 2)))) (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))) |
(+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))))) (* b (sqrt 2))))))) |
(+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))))) (* b (sqrt 2)))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))))) (* 1/2 (/ (* (pow x-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2)))))))) (* b (sqrt 2))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) |
(+ (* 1/8 (/ (* (pow angle 2) (* y-scale (* (sqrt 2) (* (sqrt 8) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))))))) b)) (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))) |
(+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* y-scale (* (sqrt 2) (* (sqrt 8) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))))) b)) (* 1/8 (/ (* (pow angle 2) (* y-scale (* (sqrt 2) (* (sqrt 8) (- (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (* 1/4 (/ (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2) (pow b 2)))))))) b))))) |
(+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* y-scale (* (sqrt 2) (* (sqrt 8) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))))) b)) (* (pow angle 2) (+ (* 1/8 (/ (* y-scale (* (sqrt 2) (* (sqrt 8) (- (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (* 1/4 (/ (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2) (pow b 2))))))) b)) (* 1/8 (/ (* (pow angle 2) (* y-scale (* (sqrt 2) (* (sqrt 8) (- (+ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6))))) (* 1/2 (/ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (- (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (* 1/4 (/ (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2) (pow b 2))))) (pow b 2)))))))) b))))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(+ (* 1/8 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* a (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))) |
(+ (* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (* (pow b 2) (+ (* -1/32 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow a 3) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* 1/8 (/ (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (* a (sin (* 1/180 (* angle (PI)))))))))) |
(+ (* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (* (pow b 2) (+ (* 1/8 (/ (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (* a (sin (* 1/180 (* angle (PI))))))) (* (pow b 2) (+ (* -1/32 (/ (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8)))) (* (pow a 3) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* 1/64 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 6) (* (sqrt 2) (sqrt 8))))) (* (pow a 5) (pow (sin (* 1/180 (* angle (PI)))) 5))))))))) |
(* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(* b (+ (* 1/8 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))) |
(* b (+ (* -1/32 (/ (* (pow a 4) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/8 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))) |
(* b (+ (* -1/32 (/ (* (pow a 4) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/64 (/ (* (pow a 6) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 6) (* (sqrt 2) (sqrt 8))))) (* (pow b 6) (pow (cos (* 1/180 (* angle (PI)))) 5)))) (+ (* 1/8 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))) |
(* -1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(* -1 (* b (+ (* 1/8 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))) |
(* -1 (* b (+ (* -1/32 (/ (* (pow a 4) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/8 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))) |
(* -1 (* b (+ (* -1/32 (/ (* (pow a 4) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/64 (/ (* (pow a 6) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 6) (* (sqrt 2) (sqrt 8))))) (* (pow b 6) (pow (cos (* 1/180 (* angle (PI)))) 5)))) (+ (* 1/8 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))))) |
(* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(+ (* 1/8 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* b (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))) |
(+ (* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (* (pow a 2) (+ (* -1/32 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow b 3) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (* 1/8 (/ (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (* b (cos (* 1/180 (* angle (PI)))))))))) |
(+ (* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (* (pow a 2) (+ (* 1/8 (/ (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (* b (cos (* 1/180 (* angle (PI))))))) (* (pow a 2) (+ (* -1/32 (/ (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8)))) (* (pow b 3) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (* 1/64 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 6) (* (sqrt 2) (sqrt 8))))) (* (pow b 5) (pow (cos (* 1/180 (* angle (PI)))) 5))))))))) |
(* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(* a (+ (* 1/8 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))) |
(* a (+ (* -1/32 (/ (* (pow b 4) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/8 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))) |
(* a (+ (* -1/32 (/ (* (pow b 4) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/64 (/ (* (pow b 6) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 6) (* (sqrt 2) (sqrt 8))))) (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 5)))) (+ (* 1/8 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))) |
(* -1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(* -1 (* a (+ (* 1/8 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))) |
(* -1 (* a (+ (* -1/32 (/ (* (pow b 4) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/8 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))) |
(* -1 (* a (+ (* -1/32 (/ (* (pow b 4) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/64 (/ (* (pow b 6) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 6) (* (sqrt 2) (sqrt 8))))) (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 5)))) (+ (* 1/8 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))))) |
(* 1/4 (* y-scale (sqrt 8))) |
(* 1/4 (* y-scale (sqrt 8))) |
(* 1/4 (* y-scale (sqrt 8))) |
(* 1/4 (* y-scale (sqrt 8))) |
(* 1/4 (* y-scale (sqrt 8))) |
(* 1/4 (* y-scale (sqrt 8))) |
(* 1/4 (* y-scale (sqrt 8))) |
(* 1/4 (* y-scale (sqrt 8))) |
(* 1/4 (* y-scale (sqrt 8))) |
(* 1/4 (* y-scale (sqrt 8))) |
(* 1/4 (* y-scale (sqrt 8))) |
(* 1/4 (* y-scale (sqrt 8))) |
(* y-scale (sqrt 8)) |
(* y-scale (sqrt 8)) |
(* y-scale (sqrt 8)) |
(* y-scale (sqrt 8)) |
(* y-scale (sqrt 8)) |
(* y-scale (sqrt 8)) |
(* y-scale (sqrt 8)) |
(* y-scale (sqrt 8)) |
(* y-scale (sqrt 8)) |
(* y-scale (sqrt 8)) |
(* y-scale (sqrt 8)) |
(* y-scale (sqrt 8)) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(+ (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))))) |
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) |
(* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))) |
(* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) |
(* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))))) |
(* -1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) |
(* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) |
(* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))))) |
(* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(+ (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))))) |
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) |
(* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) |
(* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) |
(* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))) |
(* -1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) |
(* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) |
(* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))) |
(* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))))) |
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) |
(+ (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) |
(+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))) |
(+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) |
(* -1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) |
(* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) |
(* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))))) |
(* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) |
(+ (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) |
(+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))) |
(+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) |
(* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) |
(* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) |
(* -1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) |
(* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) |
(* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))))) |
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) |
(+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))))))) (* b (sqrt 2)))) (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))) |
(+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))))) (* b (sqrt 2))))))) |
(+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))))) (* b (sqrt 2)))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))))) (* 1/2 (/ (* (pow x-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2)))))))) (* b (sqrt 2))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) |
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) |
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) |
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) |
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) |
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) |
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) |
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) |
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) |
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) |
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) |
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) |
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) |
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) |
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) |
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) |
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) |
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) |
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) |
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) |
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) |
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) |
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) |
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) |
(* 1/4 b) |
(* 1/4 b) |
(* 1/4 b) |
(* 1/4 b) |
(* 1/4 b) |
(* 1/4 b) |
(* 1/4 b) |
(* 1/4 b) |
(* 1/4 b) |
(* 1/4 b) |
(* 1/4 b) |
(* 1/4 b) |
(* y-scale (* (sqrt 2) (sqrt 8))) |
(* y-scale (* (sqrt 2) (sqrt 8))) |
(* y-scale (* (sqrt 2) (sqrt 8))) |
(* y-scale (* (sqrt 2) (sqrt 8))) |
(* y-scale (* (sqrt 2) (sqrt 8))) |
(* y-scale (* (sqrt 2) (sqrt 8))) |
(* y-scale (* (sqrt 2) (sqrt 8))) |
(* y-scale (* (sqrt 2) (sqrt 8))) |
(* y-scale (* (sqrt 2) (sqrt 8))) |
(* y-scale (* (sqrt 2) (sqrt 8))) |
(* y-scale (* (sqrt 2) (sqrt 8))) |
(* y-scale (* (sqrt 2) (sqrt 8))) |
(* (pow x-scale 2) (pow y-scale 2)) |
(* (pow x-scale 2) (pow y-scale 2)) |
(* (pow x-scale 2) (pow y-scale 2)) |
(* (pow x-scale 2) (pow y-scale 2)) |
(* (pow x-scale 2) (pow y-scale 2)) |
(* (pow x-scale 2) (pow y-scale 2)) |
(* (pow x-scale 2) (pow y-scale 2)) |
(* (pow x-scale 2) (pow y-scale 2)) |
(* (pow x-scale 2) (pow y-scale 2)) |
(* (pow x-scale 2) (pow y-scale 2)) |
(* (pow x-scale 2) (pow y-scale 2)) |
(* (pow x-scale 2) (pow y-scale 2)) |
(* (pow x-scale 2) (pow y-scale 2)) |
(* (pow x-scale 2) (pow y-scale 2)) |
(* (pow x-scale 2) (pow y-scale 2)) |
(* (pow x-scale 2) (pow y-scale 2)) |
(* (pow x-scale 2) (pow y-scale 2)) |
(* (pow x-scale 2) (pow y-scale 2)) |
(* (pow x-scale 2) (pow y-scale 2)) |
(* (pow x-scale 2) (pow y-scale 2)) |
(* (pow x-scale 2) (pow y-scale 2)) |
(* (pow x-scale 2) (pow y-scale 2)) |
(* (pow x-scale 2) (pow y-scale 2)) |
(* (pow x-scale 2) (pow y-scale 2)) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(+ (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))))) |
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) |
(* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))) |
(* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) |
(* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))))) |
(* -1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) |
(* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) |
(* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))))) |
(* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(+ (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))))) |
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) |
(* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) |
(* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) |
(* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))) |
(* -1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) |
(* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) |
(* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))) |
(* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))))) |
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) |
(+ (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) |
(+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))) |
(+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) |
(* -1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) |
(* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) |
(* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))))) |
(* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) |
(+ (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) |
(+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))) |
(+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) |
(* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) |
(* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) |
(* -1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) |
(* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) |
(* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))))) |
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) |
(+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))))))) (* b (sqrt 2)))) (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))) |
(+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))))) (* b (sqrt 2))))))) |
(+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))))) (* b (sqrt 2)))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))))) (* 1/2 (/ (* (pow x-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2)))))))) (* b (sqrt 2))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) |
(+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) |
(+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) |
(+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) |
(/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) |
(* (pow a 2) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) |
(* (pow a 2) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) |
(* (pow a 2) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) |
(/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) |
(* (pow a 2) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) |
(* (pow a 2) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) |
(* (pow a 2) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) |
(/ (pow b 2) (pow x-scale 2)) |
(+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))))) (/ (pow b 2) (pow x-scale 2))) |
(+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (/ (pow b 2) (pow x-scale 2))) |
(+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* (pow angle 2) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2)))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))))) (/ (pow b 2) (pow x-scale 2))) |
(/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)) |
(/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)) |
(/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)) |
(/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)) |
(/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)) |
(/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)) |
(/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)) |
(/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)) |
(/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) |
(+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) |
(+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) |
(+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) |
(/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) |
(* (pow b 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) |
(* (pow b 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) |
(* (pow b 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) |
(/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) |
(* (pow b 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) |
(* (pow b 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) |
(* (pow b 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) |
(/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)) |
(/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)) |
(/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)) |
(/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)) |
(/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)) |
(/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)) |
(/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)) |
(/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)) |
(/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)) |
(/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)) |
(/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)) |
(/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)) |
(/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) |
(+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) |
(+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) |
(+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) |
(/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) |
(* (pow a 2) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) |
(* (pow a 2) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) |
(* (pow a 2) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) |
(/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) |
(* (pow a 2) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) |
(* (pow a 2) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) |
(* (pow a 2) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) |
(/ (pow a 2) (pow y-scale 2)) |
(+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (pow a 2) (pow y-scale 2))) |
(+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))))) (/ (pow a 2) (pow y-scale 2))) |
(+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* (pow angle 2) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))))) (/ (pow a 2) (pow y-scale 2))) |
(/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)) |
(/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)) |
(/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)) |
(/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)) |
(/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)) |
(/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)) |
(/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)) |
(/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)) |
(/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) |
(+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) |
(+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) |
(+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) |
(/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) |
(* (pow b 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) |
(* (pow b 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) |
(* (pow b 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) |
(/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) |
(* (pow b 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) |
(* (pow b 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) |
(* (pow b 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) |
(/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)) |
(/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)) |
(/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)) |
(/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)) |
(/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)) |
(/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)) |
(/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)) |
(/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)) |
(/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)) |
(/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)) |
(/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)) |
(/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)) |
(* (* (pow a 2) (* (pow b 2) (* x-scale (* y-scale (sqrt 8))))) (sqrt (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) |
(* (pow b 2) (+ (* 1/4 (* (/ (* (pow a 2) (* b (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* (* (pow a 2) (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) |
(* (pow b 2) (+ (* b (+ (* 1/4 (* (/ (* (pow a 2) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* 1/2 (* (* (pow a 2) (* b (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (+ (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))))) (sqrt (/ 1 (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) (* (* (pow a 2) (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) |
(* (pow b 2) (+ (* b (+ (* 1/4 (* (/ (* (pow a 2) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* b (+ (* 1/2 (* (* (pow a 2) (* b (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 (pow a 3)) (* 2 (pow a 3))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (* 1/4 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 (pow a 3)) (* 2 (pow a 3))) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (+ (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))))))) (sqrt (/ 1 (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (* 1/2 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (+ (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (sqrt (/ 1 (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))))) (* (* (pow a 2) (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) |
(* (* (pow a 2) (* (pow b 3) (* x-scale (* y-scale (sqrt 8))))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) |
(* (pow b 3) (+ (* 1/4 (* (/ (* (pow a 2) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a))))) (* b (* x-scale y-scale))) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (* (* (pow a 2) (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) |
(* (pow b 3) (+ (* 1/4 (* (/ (* (pow a 2) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a))))) (* b (* x-scale y-scale))) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (+ (* 1/2 (* (/ (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))))))))) (pow b 2)) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (* (* (pow a 2) (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) |
(* (pow b 3) (+ (* 1/4 (* (/ (* (pow a 2) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a))))) (* b (* x-scale y-scale))) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (+ (* 1/2 (* (/ (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 a) (* 2 a)) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (* 1/4 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 a) (* 2 a)) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))))) (pow b 3)) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (+ (* 1/2 (* (/ (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))))))))) (pow b 2)) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (* (* (pow a 2) (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))))) |
(* -1 (* (* (pow a 2) (* (pow b 3) (* x-scale (* y-scale (sqrt 8))))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))) |
(* -1 (* (pow b 3) (+ (* -1/4 (* (/ (* (pow a 2) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a))))) (* b (* x-scale y-scale))) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (* (* (pow a 2) (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) |
(* -1 (* (pow b 3) (+ (* -1 (/ (+ (* -1/2 (* (/ (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))))))))) b) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (* 1/4 (* (/ (* (pow a 2) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a))))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))))) b)) (* (* (pow a 2) (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) |
(* -1 (* (pow b 3) (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (* (/ (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 a) (* 2 a)) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (* 1/4 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 a) (* 2 a)) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))))) b) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (* 1/2 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))))))))) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) b)) (* 1/4 (* (/ (* (pow a 2) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a))))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))))) b)) (* (* (pow a 2) (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) |
(* (* (pow a 2) (* (pow b 2) (* x-scale (* y-scale (sqrt 8))))) (sqrt (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) |
(* (pow a 2) (+ (* 1/4 (* (/ (* a (* (pow b 2) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* (* (pow b 2) (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) |
(* (pow a 2) (+ (* a (+ (* 1/4 (* (/ (* (pow b 2) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* 1/2 (* (* a (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (+ (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))))) (sqrt (/ 1 (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (* (* (pow b 2) (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) |
(* (pow a 2) (+ (* a (+ (* 1/4 (* (/ (* (pow b 2) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* a (+ (* 1/2 (* (* a (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 (pow b 3)) (* 2 (pow b 3))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (* 1/4 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 (pow b 3)) (* 2 (pow b 3))) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (+ (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))) (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))))))) (sqrt (/ 1 (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (* 1/2 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (+ (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (sqrt (/ 1 (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))))) (* (* (pow b 2) (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) |
(* (* (pow a 3) (* (pow b 2) (* x-scale (* y-scale (sqrt 8))))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) |
(* (pow a 3) (+ (* 1/4 (* (/ (* (pow b 2) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b))))) (* a (* x-scale y-scale))) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (* (* (pow b 2) (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))) |
(* (pow a 3) (+ (* 1/4 (* (/ (* (pow b 2) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b))))) (* a (* x-scale y-scale))) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (+ (* 1/2 (* (/ (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))))))))) (pow a 2)) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))) (* (* (pow b 2) (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) |
(* (pow a 3) (+ (* 1/4 (* (/ (* (pow b 2) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b))))) (* a (* x-scale y-scale))) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (+ (* 1/2 (* (/ (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 b) (* 2 b)) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (* 1/4 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 b) (* 2 b)) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))))) (pow a 3)) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))) (+ (* 1/2 (* (/ (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))))))))) (pow a 2)) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))) (* (* (pow b 2) (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))))) |
(* -1 (* (* (pow a 3) (* (pow b 2) (* x-scale (* y-scale (sqrt 8))))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) |
(* -1 (* (pow a 3) (+ (* -1/4 (* (/ (* (pow b 2) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b))))) (* a (* x-scale y-scale))) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (* (* (pow b 2) (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) |
(* -1 (* (pow a 3) (+ (* -1 (/ (+ (* -1/2 (* (/ (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))))))))) a) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))) (* 1/4 (* (/ (* (pow b 2) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b))))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))))) a)) (* (* (pow b 2) (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) |
(* -1 (* (pow a 3) (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (* (/ (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 b) (* 2 b)) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (* 1/4 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 b) (* 2 b)) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))))) a) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))) (* 1/2 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))))))))) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) a)) (* 1/4 (* (/ (* (pow b 2) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b))))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))))) a)) (* (* (pow b 2) (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) |
(* (* (pow a 2) (* (pow b 2) (* y-scale (sqrt 8)))) (sqrt (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) |
(+ (* 1/2 (* (* (pow a 2) (* (pow b 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (* (* (pow a 2) (* (pow b 2) (* y-scale (sqrt 8)))) (sqrt (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))) |
(+ (* (* (pow a 2) (* (pow b 2) (* y-scale (sqrt 8)))) (sqrt (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* (pow x-scale 2) (+ (* 1/2 (* (* (pow a 2) (* (pow b 2) (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (* 1/2 (* (* (pow a 2) (* (pow b 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))))) |
(+ (* (* (pow a 2) (* (pow b 2) (* y-scale (sqrt 8)))) (sqrt (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* (pow x-scale 2) (+ (* 1/2 (* (* (pow a 2) (* (pow b 2) (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (* (pow x-scale 2) (+ (* 1/2 (* (* (pow a 2) (* (pow b 2) (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (* 1/2 (* (* (pow a 2) (* (pow b 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))))))) |
(* (* (pow a 2) (* (pow b 2) (* x-scale (* y-scale (sqrt 8))))) (sqrt (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) |
(* x-scale (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (* (* (pow a 2) (* (pow b 2) (* y-scale (sqrt 8)))) (sqrt (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) |
(* x-scale (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (* (* (pow a 2) (* (pow b 2) (* y-scale (sqrt 8)))) (sqrt (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))) |
(* x-scale (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))))) (pow x-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (* (* (pow a 2) (* (pow b 2) (* y-scale (sqrt 8)))) (sqrt (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) |
(* -1 (* (* (pow a 2) (* (pow b 2) (* x-scale (* y-scale (sqrt 8))))) (sqrt (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))) |
(* -1 (* x-scale (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (* (* (pow a 2) (* (pow b 2) (* y-scale (sqrt 8)))) (sqrt (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))) |
(* -1 (* x-scale (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (* (* (pow a 2) (* (pow b 2) (* y-scale (sqrt 8)))) (sqrt (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) |
(* -1 (* x-scale (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))))) (pow x-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (* (* (pow a 2) (* (pow b 2) (* y-scale (sqrt 8)))) (sqrt (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))))) |
(* (* (pow a 2) (* (pow b 2) (* x-scale (sqrt 8)))) (sqrt (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) |
(+ (* 1/2 (* (* (pow a 2) (* (pow b 2) (* x-scale (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (* (* (pow a 2) (* (pow b 2) (* x-scale (sqrt 8)))) (sqrt (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))) |
(+ (* (* (pow a 2) (* (pow b 2) (* x-scale (sqrt 8)))) (sqrt (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* (pow y-scale 2) (+ (* 1/2 (* (* (pow a 2) (* (pow b 2) (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (* 1/2 (* (* (pow a 2) (* (pow b 2) (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))))) |
(+ (* (* (pow a 2) (* (pow b 2) (* x-scale (sqrt 8)))) (sqrt (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* (pow y-scale 2) (+ (* 1/2 (* (* (pow a 2) (* (pow b 2) (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (* (pow y-scale 2) (+ (* 1/2 (* (* (pow a 2) (* (pow b 2) (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (* 1/2 (* (* (pow a 2) (* (pow b 2) (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))))))) |
(* (* (pow a 2) (* (pow b 2) (* x-scale (* y-scale (sqrt 8))))) (sqrt (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) |
(* y-scale (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (* (* (pow a 2) (* (pow b 2) (* x-scale (sqrt 8)))) (sqrt (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) |
(* y-scale (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (* (* (pow a 2) (* (pow b 2) (* x-scale (sqrt 8)))) (sqrt (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))) |
(* y-scale (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* x-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))))) (pow y-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (* (* (pow a 2) (* (pow b 2) (* x-scale (sqrt 8)))) (sqrt (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) |
(* -1 (* (* (pow a 2) (* (pow b 2) (* x-scale (* y-scale (sqrt 8))))) (sqrt (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) |
(* -1 (* y-scale (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (* (* (pow a 2) (* (pow b 2) (* x-scale (sqrt 8)))) (sqrt (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))) |
(* -1 (* y-scale (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (* (* (pow a 2) (* (pow b 2) (* x-scale (sqrt 8)))) (sqrt (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) |
(* -1 (* y-scale (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* x-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))))) (pow y-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (* (* (pow a 2) (* (pow b 2) (* x-scale (sqrt 8)))) (sqrt (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))))) |
(* (pow a 2) (* (pow b 3) (* y-scale (* (sqrt 2) (sqrt 8))))) |
(+ (* 1/2 (/ (* (pow a 2) (* (pow angle 2) (* b (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))))))))) (sqrt 2))) (* (pow a 2) (* (pow b 3) (* y-scale (* (sqrt 2) (sqrt 8)))))) |
(+ (* (pow a 2) (* (pow b 3) (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow a 2) (* b (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))))))) (sqrt 2))) (* 1/2 (/ (* (pow a 2) (* (pow angle 2) (* b (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/2 (/ (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))))))) (sqrt 2)))))) |
(+ (* (pow a 2) (* (pow b 3) (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow a 2) (* b (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))))))) (sqrt 2))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow a 2) (* b (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/2 (/ (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2)))))))))) (sqrt 2))) (* 1/2 (/ (* (pow a 2) (* (pow angle 2) (* b (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow y-scale 2))) (+ (* -1/765275040000000 (/ (* (pow b 2) (pow (PI) 6)) (pow x-scale 2))) (+ (* 1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow x-scale 2))) (+ (* 1/765275040000000 (/ (* (pow b 2) (pow (PI) 6)) (pow y-scale 2))) (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))))) (+ (* 2 (* (- (+ (* -1/765275040000000 (/ (* (pow b 2) (pow (PI) 6)) (pow x-scale 2))) (* 1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow x-scale 2)))) (+ (* -1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow y-scale 2))) (* 1/765275040000000 (/ (* (pow b 2) (pow (PI) 6)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow (+ a b) 2) (* (+ (* 1/31886460000000 (pow (PI) 6)) (* 1/19131876000000 (pow (PI) 6))) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (* 1/2 (/ (* (pow x-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/2 (/ (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))) (* (pow b 2) (pow (sqrt 2) 2))))))))))) (sqrt 2)))))))) |
(* (* (pow a 2) (* (pow b 2) (* x-scale (* y-scale (sqrt 8))))) (sqrt (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) |
(* (* (pow a 2) (* (pow b 2) (* x-scale (* y-scale (sqrt 8))))) (sqrt (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) |
(* (* (pow a 2) (* (pow b 2) (* x-scale (* y-scale (sqrt 8))))) (sqrt (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) |
(* (* (pow a 2) (* (pow b 2) (* x-scale (* y-scale (sqrt 8))))) (sqrt (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) |
(* (* (pow a 2) (* (pow b 2) (* x-scale (* y-scale (sqrt 8))))) (sqrt (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) |
(* (* (pow a 2) (* (pow b 2) (* x-scale (* y-scale (sqrt 8))))) (sqrt (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) |
(* (* (pow a 2) (* (pow b 2) (* x-scale (* y-scale (sqrt 8))))) (sqrt (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) |
(* (* (pow a 2) (* (pow b 2) (* x-scale (* y-scale (sqrt 8))))) (sqrt (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) |
(* 1/90 (* angle (PI))) |
(* 1/90 (* angle (PI))) |
(* 1/90 (* angle (PI))) |
(* 1/90 (* angle (PI))) |
(* 1/90 (* angle (PI))) |
(* 1/90 (* angle (PI))) |
(* 1/90 (* angle (PI))) |
(* 1/90 (* angle (PI))) |
(* 1/90 (* angle (PI))) |
(* 1/90 (* angle (PI))) |
(* 1/90 (* angle (PI))) |
(* 1/90 (* angle (PI))) |
(/ 1/4 (* (pow a 2) (pow b 2))) |
(/ 1/4 (* (pow a 2) (pow b 2))) |
(/ 1/4 (* (pow a 2) (pow b 2))) |
(/ 1/4 (* (pow a 2) (pow b 2))) |
(/ 1/4 (* (pow a 2) (pow b 2))) |
(/ 1/4 (* (pow a 2) (pow b 2))) |
(/ 1/4 (* (pow a 2) (pow b 2))) |
(/ 1/4 (* (pow a 2) (pow b 2))) |
(/ 1/4 (* (pow a 2) (pow b 2))) |
(/ 1/4 (* (pow a 2) (pow b 2))) |
(/ 1/4 (* (pow a 2) (pow b 2))) |
(/ 1/4 (* (pow a 2) (pow b 2))) |
(/ 1/4 (* (pow a 2) (pow b 2))) |
(/ 1/4 (* (pow a 2) (pow b 2))) |
(/ 1/4 (* (pow a 2) (pow b 2))) |
(/ 1/4 (* (pow a 2) (pow b 2))) |
(/ 1/4 (* (pow a 2) (pow b 2))) |
(/ 1/4 (* (pow a 2) (pow b 2))) |
(/ 1/4 (* (pow a 2) (pow b 2))) |
(/ 1/4 (* (pow a 2) (pow b 2))) |
(/ 1/4 (* (pow a 2) (pow b 2))) |
(/ 1/4 (* (pow a 2) (pow b 2))) |
(/ 1/4 (* (pow a 2) (pow b 2))) |
(/ 1/4 (* (pow a 2) (pow b 2))) |
(* -4 (* (pow a 2) (pow b 2))) |
(* -4 (* (pow a 2) (pow b 2))) |
(* -4 (* (pow a 2) (pow b 2))) |
(* -4 (* (pow a 2) (pow b 2))) |
(* -4 (* (pow a 2) (pow b 2))) |
(* -4 (* (pow a 2) (pow b 2))) |
(* -4 (* (pow a 2) (pow b 2))) |
(* -4 (* (pow a 2) (pow b 2))) |
(* -4 (* (pow a 2) (pow b 2))) |
(* -4 (* (pow a 2) (pow b 2))) |
(* -4 (* (pow a 2) (pow b 2))) |
(* -4 (* (pow a 2) (pow b 2))) |
(* -4 (* (pow a 2) (pow b 2))) |
(* -4 (* (pow a 2) (pow b 2))) |
(* -4 (* (pow a 2) (pow b 2))) |
(* -4 (* (pow a 2) (pow b 2))) |
(* -4 (* (pow a 2) (pow b 2))) |
(* -4 (* (pow a 2) (pow b 2))) |
(* -4 (* (pow a 2) (pow b 2))) |
(* -4 (* (pow a 2) (pow b 2))) |
(* -4 (* (pow a 2) (pow b 2))) |
(* -4 (* (pow a 2) (pow b 2))) |
(* -4 (* (pow a 2) (pow b 2))) |
(* -4 (* (pow a 2) (pow b 2))) |
(* 1/2 (/ (pow y-scale 2) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) |
(+ (* -1/2 (/ (* (pow b 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (* 1/2 (/ (pow y-scale 2) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) |
(+ (* 1/2 (/ (pow y-scale 2) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (- (* 1/2 (/ (* (pow b 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 6) (pow (cos (* 1/180 (* angle (PI)))) 6)))) (* 1/2 (/ (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) |
(+ (* 1/2 (/ (pow y-scale 2) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (- (* (pow b 2) (- (* -1/2 (/ (* (pow b 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* (pow a 8) (pow (cos (* 1/180 (* angle (PI)))) 8)))) (* -1/2 (/ (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow a 6) (pow (cos (* 1/180 (* angle (PI)))) 6)))))) (* 1/2 (/ (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) |
(* 1/2 (/ (pow y-scale 2) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) |
(/ (+ (* -1/2 (/ (* (pow a 2) (* (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 1/2 (/ (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow b 2)) |
(/ (- (+ (* 1/2 (/ (* (pow a 4) (* (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/2 (/ (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* 1/2 (/ (* (pow a 2) (* (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow b 2)) |
(/ (- (+ (* -1/2 (/ (* (pow a 6) (* (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 6))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 8)))) (* 1/2 (/ (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (* -1/2 (/ (* (pow a 4) (* (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/2 (/ (* (pow a 2) (* (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (pow b 2)) |
(* 1/2 (/ (pow y-scale 2) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) |
(/ (+ (* -1/2 (/ (* (pow a 2) (* (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 1/2 (/ (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow b 2)) |
(/ (- (+ (* 1/2 (/ (* (pow a 4) (* (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/2 (/ (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* 1/2 (/ (* (pow a 2) (* (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow b 2)) |
(/ (- (+ (* -1/2 (/ (* (pow a 6) (* (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 6))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 8)))) (* 1/2 (/ (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (* -1/2 (/ (* (pow a 4) (* (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/2 (/ (* (pow a 2) (* (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (pow b 2)) |
(* 1/2 (/ (pow y-scale 2) (pow a 2))) |
(+ (* -1/2 (/ (* (pow angle 2) (* (pow y-scale 4) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 4))) (* 1/2 (/ (pow y-scale 2) (pow a 2)))) |
(+ (* 1/2 (/ (pow y-scale 2) (pow a 2))) (* (pow angle 2) (- (* -1 (* (pow angle 2) (+ (* -1/2 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (* 1/2 (/ (* (pow y-scale 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (pow a 4)))))) (* 1/2 (/ (* (pow y-scale 4) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow a 4)))))) |
(+ (* 1/2 (/ (pow y-scale 2) (pow a 2))) (* (pow angle 2) (- (* (pow angle 2) (- (* -1 (* (pow angle 2) (+ (* -1 (/ (* (pow y-scale 2) (* (+ (* -1/2 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (* 1/2 (/ (* (pow y-scale 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (pow a 4)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2))) (+ (* -1/2 (/ (* (pow y-scale 6) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))) (pow a 6))) (* 1/2 (/ (* (pow y-scale 4) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (pow a 4))))))) (+ (* -1/2 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (* 1/2 (/ (* (pow y-scale 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (pow a 4)))))) (* 1/2 (/ (* (pow y-scale 4) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow a 4)))))) |
(/ 1/2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) |
(/ 1/2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) |
(/ 1/2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) |
(/ 1/2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) |
(/ 1/2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) |
(/ 1/2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) |
(/ 1/2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) |
(/ 1/2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) |
(* 1/2 (/ (pow y-scale 2) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) |
(* 1/2 (/ (pow y-scale 2) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) |
(* 1/2 (/ (pow y-scale 2) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) |
(* 1/2 (/ (pow y-scale 2) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) |
(* 1/2 (/ (pow y-scale 2) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) |
(* 1/2 (/ (pow y-scale 2) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) |
(* 1/2 (/ (pow y-scale 2) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) |
(* 1/2 (/ (pow y-scale 2) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) |
(* 1/2 (/ (pow y-scale 2) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) |
(* 1/2 (/ (pow y-scale 2) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) |
(* 1/2 (/ (pow y-scale 2) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) |
(* 1/2 (/ (pow y-scale 2) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) |
(* 1/2 (/ (pow y-scale 2) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) |
(+ (* -1/2 (/ (* (pow a 2) (* (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 1/2 (/ (pow y-scale 2) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) |
(+ (* 1/2 (/ (pow y-scale 2) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (- (* 1/2 (/ (* (pow a 2) (* (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/2 (/ (* (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) |
(+ (* 1/2 (/ (pow y-scale 2) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (- (* (pow a 2) (- (* -1/2 (/ (* (pow a 2) (* (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 6))) (* (pow b 8) (pow (sin (* 1/180 (* angle (PI)))) 8)))) (* -1/2 (/ (* (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (* 1/2 (/ (* (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) |
(* 1/2 (/ (pow y-scale 2) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) |
(/ (+ (* -1/2 (/ (* (pow b 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (* 1/2 (/ (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow a 2)) |
(/ (- (+ (* 1/2 (/ (* (pow b 4) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 6)))) (* 1/2 (/ (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* 1/2 (/ (* (pow b 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (pow a 2)) |
(/ (- (+ (* -1/2 (/ (* (pow b 6) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* (pow a 6) (pow (cos (* 1/180 (* angle (PI)))) 8)))) (* 1/2 (/ (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (+ (* -1/2 (/ (* (pow b 4) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 6)))) (* 1/2 (/ (* (pow b 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (pow a 2)) |
(* 1/2 (/ (pow y-scale 2) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) |
(/ (+ (* -1/2 (/ (* (pow b 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (* 1/2 (/ (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow a 2)) |
(/ (- (+ (* 1/2 (/ (* (pow b 4) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 6)))) (* 1/2 (/ (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* 1/2 (/ (* (pow b 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (pow a 2)) |
(/ (- (+ (* -1/2 (/ (* (pow b 6) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* (pow a 6) (pow (cos (* 1/180 (* angle (PI)))) 8)))) (* 1/2 (/ (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (+ (* -1/2 (/ (* (pow b 4) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 6)))) (* 1/2 (/ (* (pow b 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (pow a 2)) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(+ (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))))) |
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) |
(* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))) |
(* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) |
(* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))))) |
(* -1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) |
(* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) |
(* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))))) |
(* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(+ (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))))) |
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) |
(* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) |
(* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) |
(* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))) |
(* -1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) |
(* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) |
(* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))) |
(* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))))) |
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) |
(+ (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) |
(+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))) |
(+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) |
(* -1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) |
(* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) |
(* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))))) |
(* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) |
(+ (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) |
(+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))) |
(+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) |
(* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) |
(* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) |
(* -1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) |
(* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) |
(* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))))) |
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) |
(+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))))))) (* b (sqrt 2)))) (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))) |
(+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))))) (* b (sqrt 2))))))) |
(+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))))) (* b (sqrt 2)))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))))) (* 1/2 (/ (* (pow x-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2)))))))) (* b (sqrt 2))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) x-scale) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(/ (+ (* 1/8 (* (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* (pow x-scale 2) (* y-scale (* (sqrt 2) (sqrt 8)))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) x-scale) |
(/ (+ (* 1/8 (* (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* (pow x-scale 2) (* y-scale (* (sqrt 2) (sqrt 8)))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) x-scale) |
(/ (+ (* 1/8 (* (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* (pow x-scale 2) (* y-scale (* (sqrt 2) (sqrt 8)))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) x-scale) |
(* 1/4 (* (* x-scale (* y-scale (* (sqrt 2) (sqrt 8)))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) |
(* 1/4 (* (* x-scale (* y-scale (* (sqrt 2) (sqrt 8)))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) |
(* -1 (* x-scale (+ (* -1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* -1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) |
(* -1 (* x-scale (+ (* -1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* -1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) |
(* -1 (* x-scale (+ (* -1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* -1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) |
(* 1/4 (* (* x-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) |
(+ (* 1/8 (* (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) x-scale) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* 1/4 (* (* x-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) |
(+ (* 1/8 (* (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) x-scale) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* 1/4 (* (* x-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) |
(+ (* 1/8 (* (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) x-scale) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* 1/4 (* (* x-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) |
(* 1/8 (* (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) x-scale) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) |
(* (pow y-scale 2) (+ (* 1/8 (* (/ (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) x-scale) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* 1/4 (* (/ (* x-scale (* (sqrt 2) (sqrt 8))) (pow y-scale 2)) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) |
(* (pow y-scale 2) (+ (* 1/8 (* (/ (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) x-scale) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* 1/4 (* (/ (* x-scale (* (sqrt 2) (sqrt 8))) (pow y-scale 2)) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) |
(* (pow y-scale 2) (+ (* 1/8 (* (/ (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) x-scale) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* 1/4 (* (/ (* x-scale (* (sqrt 2) (sqrt 8))) (pow y-scale 2)) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) |
(* -1/8 (* (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) x-scale) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) |
(* (pow y-scale 2) (+ (* -1/4 (* (/ (* x-scale (* (sqrt 2) (sqrt 8))) (pow y-scale 2)) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* -1/8 (* (/ (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) x-scale) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) |
(* (pow y-scale 2) (+ (* -1/4 (* (/ (* x-scale (* (sqrt 2) (sqrt 8))) (pow y-scale 2)) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* -1/8 (* (/ (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) x-scale) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) |
(* (pow y-scale 2) (+ (* -1/4 (* (/ (* x-scale (* (sqrt 2) (sqrt 8))) (pow y-scale 2)) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* -1/8 (* (/ (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) x-scale) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) |
(* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (* 1/4 (* a (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))) |
(+ (* 1/4 (/ (* b (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))))))) (* (pow a 3) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (* 1/4 (* a (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))) |
(+ (* b (+ (* 1/4 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))))) (* (pow a 3) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (* b (* x-scale (+ (* 1/8 (+ (* -1/2 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow a 3) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 3))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))))) (* 1/8 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))) (* a (cos (* 1/180 (* angle (PI)))))))))))) (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (* 1/4 (* a (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))) |
(+ (* b (+ (* 1/4 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))))) (* (pow a 3) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (* b (+ (* 1/8 (* b (* x-scale (+ (* -1 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))))) (* (pow a 5) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 3))))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (pow a 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))))))) (* x-scale (+ (* 1/8 (+ (* -1/2 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow a 3) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 3))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))))) (* 1/8 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))) (* a (cos (* 1/180 (* angle (PI))))))))))))) (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (* 1/4 (* a (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))) |
(* b (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))) |
(* b (+ (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))))) (* b (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))) |
(* b (+ (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))))) (* b (* x-scale (sin (* 1/180 (* angle (PI)))))))) (+ (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (/ (* x-scale (+ (* 1/8 (+ (* -1/2 (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))) |
(* b (+ (* 1/8 (/ (* x-scale (+ (* -1 (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 a) (* 2 a))))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* 4 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (+ (* -2 a) (* 2 a)))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))))) (pow b 3))) (+ (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))))) (* b (* x-scale (sin (* 1/180 (* angle (PI)))))))) (+ (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (/ (* x-scale (+ (* 1/8 (+ (* -1/2 (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2)))))) |
(* -1 (* b (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))) |
(* -1 (* b (+ (* -1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))))) (* b (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))) |
(* -1 (* b (+ (* -1 (/ (+ (* -1 (/ (* x-scale (+ (* 1/8 (+ (* -1/2 (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (sin (* 1/180 (* angle (PI)))))))) b)) (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))) b)) (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))) |
(* -1 (* b (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (/ (* x-scale (+ (* -1 (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 a) (* 2 a))))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* 4 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (+ (* -2 a) (* 2 a)))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))))) b)) (* x-scale (+ (* 1/8 (+ (* -1/2 (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (sin (* 1/180 (* angle (PI))))))))) b)) (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))) b)) (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))) |
(* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (pow b 2)) (pow b 2))))) (* a (pow x-scale 2)))) (* 1/4 (* a (* (sqrt 2) (sqrt 8)))))) |
(+ (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (pow b 2)) (pow b 2))))) (* a (pow x-scale 2)))) (* 1/4 (* a (* (sqrt 2) (sqrt 8)))))) (* (pow angle 2) (* x-scale (+ (* 1/8 (+ (* -1/2 (/ (* (pow y-scale 4) (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1 (pow b 2)) (pow b 2)) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))))) (* (pow a 3) (pow x-scale 2)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))))))) (* a (pow x-scale 2))))) (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 2) (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))))) a)))))) |
(+ (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (pow b 2)) (pow b 2))))) (* a (pow x-scale 2)))) (* 1/4 (* a (* (sqrt 2) (sqrt 8)))))) (* (pow angle 2) (+ (* x-scale (+ (* 1/8 (+ (* -1/2 (/ (* (pow y-scale 4) (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1 (pow b 2)) (pow b 2)) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))))) (* (pow a 3) (pow x-scale 2)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))))))) (* a (pow x-scale 2))))) (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 2) (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))))) a)))) (* (pow angle 2) (* x-scale (+ (* 1/8 (+ (* -1/2 (/ (* a (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (+ (* 1/4 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (/ (* (pow y-scale 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (pow a 4)))) (+ (* -1 (pow b 2)) (pow b 2)))))) (pow x-scale 2))) (+ (* -1/2 (/ (* (pow y-scale 4) (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2))))))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))))) (* (pow a 3) (pow x-scale 2)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (+ (* (pow b 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 2))))) (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))))) (pow a 2)) (+ (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))) (pow a 2))) (/ (* (pow y-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))) (pow a 2))))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))) (* a (pow x-scale 2)))))) (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 2) (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 2))))))) a)))))))) |
(+ (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (pow b 2)) (pow b 2))))) (* a (pow x-scale 2)))) (* 1/4 (* a (* (sqrt 2) (sqrt 8)))))) (* (pow angle 2) (+ (* x-scale (+ (* 1/8 (+ (* -1/2 (/ (* (pow y-scale 4) (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1 (pow b 2)) (pow b 2)) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))))) (* (pow a 3) (pow x-scale 2)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))))))) (* a (pow x-scale 2))))) (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 2) (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))))) a)))) (* (pow angle 2) (+ (* x-scale (+ (* 1/8 (+ (* -1/2 (/ (* a (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (+ (* 1/4 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (/ (* (pow y-scale 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (pow a 4)))) (+ (* -1 (pow b 2)) (pow b 2)))))) (pow x-scale 2))) (+ (* -1/2 (/ (* (pow y-scale 4) (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2))))))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))))) (* (pow a 3) (pow x-scale 2)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (+ (* (pow b 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 2))))) (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))))) (pow a 2)) (+ (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))) (pow a 2))) (/ (* (pow y-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))) (pow a 2))))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))) (* a (pow x-scale 2)))))) (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 2) (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 2))))))) a)))) (* (pow angle 2) (* x-scale (+ (* 1/8 (+ (* -1/2 (/ (* a (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1 (/ (* (pow y-scale 2) (* (+ (* -1 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (/ (* (pow y-scale 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (pow a 4))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2))) (+ (* -1 (/ (* (pow y-scale 6) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))) (pow a 6))) (+ (* 1/2 (/ (* (pow y-scale 2) (* (+ (* -1 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (+ (* 1/4 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (/ (* (pow y-scale 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (pow a 4)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2))) (/ (* (pow y-scale 4) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (pow a 4))))) (+ (* -1 (pow b 2)) (pow b 2)))))) (pow x-scale 2))) (+ (* -1/2 (/ (* a (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (+ (* 1/4 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (/ (* (pow y-scale 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (pow a 4)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2))))))))))) (pow x-scale 2))) (+ (* -1/2 (/ (* (pow y-scale 4) (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (+ (* (pow b 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 2))))) (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))))) (pow a 2)) (+ (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))) (pow a 2))) (/ (* (pow y-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))) (pow a 2))))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))))))) (* (pow a 3) (pow x-scale 2)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (+ (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (+ (* (pow b 2) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))))) (pow y-scale 2)))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- b a) 2)))) (pow y-scale 2))) (/ (* (pow (+ a b) 2) (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- b a) 2))) (pow y-scale 2))))))) (pow a 2)) (+ (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))))) (pow a 2))) (+ (/ (* (pow y-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (+ (* (pow b 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 2))))) (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))))) (pow a 2)) (+ (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))) (pow a 2))) (/ (* (pow y-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))) (pow a 2)))))) (pow a 2)) (/ (* (pow y-scale 2) (* (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))) (pow a 2)))))) (+ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6))))))))) (* a (pow x-scale 2))))))) (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 2) (* (sqrt 8) (- (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 2)))))) (pow a 2))))))) a)))))))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) |
(* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/4 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))) |
(+ (* 1/4 (/ (* a (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))))))) (* (pow b 3) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/4 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))) |
(+ (* a (+ (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))))) (* (pow b 3) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* a (* x-scale (+ (* 1/8 (+ (* -1/2 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow b 3) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))))) (* 1/8 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))) (* b (sin (* 1/180 (* angle (PI)))))))))))) (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/4 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))) |
(+ (* a (+ (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))))) (* (pow b 3) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* a (+ (* 1/8 (* a (* x-scale (+ (* -1 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))))) (* (pow b 5) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (pow b 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))))))) (* x-scale (+ (* 1/8 (+ (* -1/2 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow b 3) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))))) (* 1/8 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))) (* b (sin (* 1/180 (* angle (PI))))))))))))) (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/4 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))) |
(* a (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))) |
(* a (+ (* 1/4 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))))) (* a (* x-scale (cos (* 1/180 (* angle (PI)))))))) (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))) |
(* a (+ (* 1/4 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))))) (* a (* x-scale (cos (* 1/180 (* angle (PI)))))))) (+ (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (/ (* x-scale (+ (* 1/8 (+ (* -1/2 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (* 1/8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (cos (* 1/180 (* angle (PI)))))))) (pow a 2))))) |
(* a (+ (* 1/8 (/ (* x-scale (+ (* -1 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 b) (* 2 b))))))) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* 4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (+ (* -2 b) (* 2 b)))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))))) (pow a 3))) (+ (* 1/4 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))))) (* a (* x-scale (cos (* 1/180 (* angle (PI)))))))) (+ (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (/ (* x-scale (+ (* 1/8 (+ (* -1/2 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (* 1/8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (cos (* 1/180 (* angle (PI)))))))) (pow a 2)))))) |
(* -1 (* a (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))) |
(* -1 (* a (+ (* -1/4 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))))) (* a (* x-scale (cos (* 1/180 (* angle (PI)))))))) (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))) |
(* -1 (* a (+ (* -1 (/ (+ (* -1 (/ (* x-scale (+ (* 1/8 (+ (* -1/2 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (* 1/8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (cos (* 1/180 (* angle (PI)))))))) a)) (* 1/4 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))) a)) (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))) |
(* -1 (* a (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (/ (* x-scale (+ (* -1 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 b) (* 2 b))))))) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* 4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (+ (* -2 b) (* 2 b)))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))))) a)) (* x-scale (+ (* 1/8 (+ (* -1/2 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (* 1/8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (cos (* 1/180 (* angle (PI))))))))) a)) (* 1/4 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))) a)) (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))) |
(* 1/4 (* (* (sqrt 2) (sqrt 8)) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) |
(+ (* 1/8 (* (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* 1/4 (* (* (sqrt 2) (sqrt 8)) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) |
(+ (* 1/8 (* (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* 1/4 (* (* (sqrt 2) (sqrt 8)) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) |
(+ (* 1/8 (* (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* 1/4 (* (* (sqrt 2) (sqrt 8)) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) |
(* 1/8 (* (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) |
(* (pow y-scale 2) (+ (* 1/8 (* (/ (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* 1/4 (* (/ (* (sqrt 2) (sqrt 8)) (pow y-scale 2)) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) |
(* (pow y-scale 2) (+ (* 1/8 (* (/ (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* 1/4 (* (/ (* (sqrt 2) (sqrt 8)) (pow y-scale 2)) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) |
(* (pow y-scale 2) (+ (* 1/8 (* (/ (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* 1/4 (* (/ (* (sqrt 2) (sqrt 8)) (pow y-scale 2)) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) |
(* -1/8 (* (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) |
(* (pow y-scale 2) (+ (* -1/4 (* (/ (* (sqrt 2) (sqrt 8)) (pow y-scale 2)) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* -1/8 (* (/ (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) |
(* (pow y-scale 2) (+ (* -1/4 (* (/ (* (sqrt 2) (sqrt 8)) (pow y-scale 2)) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* -1/8 (* (/ (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) |
(* (pow y-scale 2) (+ (* -1/4 (* (/ (* (sqrt 2) (sqrt 8)) (pow y-scale 2)) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* -1/8 (* (/ (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) |
(+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (* 1/4 (* a (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (+ (* 1/4 (* a (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* b (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))))))) (* (pow a 3) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))))) |
(+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (+ (* 1/4 (* a (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* b (+ (* 1/4 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))))) (* (pow a 3) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (* b (+ (* 1/8 (+ (* -1/2 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow a 3) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 3))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))))) (* 1/8 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))) (* a (cos (* 1/180 (* angle (PI))))))))))))) |
(+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (+ (* 1/4 (* a (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* b (+ (* 1/4 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))))) (* (pow a 3) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (* b (+ (* 1/8 (* b (+ (* -1 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))))) (* (pow a 5) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 3))))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (pow a 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))))))) (+ (* 1/8 (+ (* -1/2 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow a 3) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 3))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))))) (* 1/8 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))) (* a (cos (* 1/180 (* angle (PI)))))))))))))) |
(* b (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(* b (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))))))) |
(* b (+ (* 1/8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (* (pow b 2) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/8 (/ (+ (* -1/2 (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (pow b 2))) (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))))))))) |
(* b (+ (* 1/8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (* (pow b 2) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/8 (/ (+ (* -1 (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 a) (* 2 a))))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* 4 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (+ (* -2 a) (* 2 a)))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (pow b 3))) (+ (* 1/8 (/ (+ (* -1/2 (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (pow b 2))) (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))))))))) |
(* -1 (* b (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))) |
(* -1 (* b (+ (* -1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))) |
(* -1 (* b (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/8 (+ (* -1/2 (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (sin (* 1/180 (* angle (PI))))))) b)) (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) b)) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))) |
(* -1 (* b (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (/ (+ (* -1 (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 a) (* 2 a))))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* 4 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (+ (* -2 a) (* 2 a)))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) b)) (+ (* 1/8 (+ (* -1/2 (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (sin (* 1/180 (* angle (PI)))))))) b)) (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) b)) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))) |
(+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (pow b 2)) (pow b 2))))) (* a (pow x-scale 2)))) (* 1/4 (* a (* (sqrt 2) (sqrt 8))))) |
(+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (pow b 2)) (pow b 2))))) (* a (pow x-scale 2)))) (+ (* 1/4 (* a (* (sqrt 2) (sqrt 8)))) (* (pow angle 2) (+ (* 1/8 (+ (* -1/2 (/ (* (pow y-scale 4) (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1 (pow b 2)) (pow b 2)) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))))) (* (pow a 3) (pow x-scale 2)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))))))) (* a (pow x-scale 2))))) (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 2) (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))))) a)))))) |
(+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (pow b 2)) (pow b 2))))) (* a (pow x-scale 2)))) (+ (* 1/4 (* a (* (sqrt 2) (sqrt 8)))) (* (pow angle 2) (+ (* 1/8 (+ (* -1/2 (/ (* (pow y-scale 4) (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1 (pow b 2)) (pow b 2)) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))))) (* (pow a 3) (pow x-scale 2)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))))))) (* a (pow x-scale 2))))) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 2) (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))))) a)) (* (pow angle 2) (+ (* 1/8 (+ (* -1/2 (/ (* a (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (+ (* 1/4 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (/ (* (pow y-scale 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (pow a 4)))) (+ (* -1 (pow b 2)) (pow b 2)))))) (pow x-scale 2))) (+ (* -1/2 (/ (* (pow y-scale 4) (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2))))))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))))) (* (pow a 3) (pow x-scale 2)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (+ (* (pow b 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 2))))) (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))))) (pow a 2)) (+ (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))) (pow a 2))) (/ (* (pow y-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))) (pow a 2))))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))) (* a (pow x-scale 2)))))) (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 2) (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 2))))))) a))))))))) |
(+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (pow b 2)) (pow b 2))))) (* a (pow x-scale 2)))) (+ (* 1/4 (* a (* (sqrt 2) (sqrt 8)))) (* (pow angle 2) (+ (* 1/8 (+ (* -1/2 (/ (* (pow y-scale 4) (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1 (pow b 2)) (pow b 2)) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))))) (* (pow a 3) (pow x-scale 2)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))))))) (* a (pow x-scale 2))))) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 2) (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))))) a)) (* (pow angle 2) (+ (* 1/8 (+ (* -1/2 (/ (* a (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (+ (* 1/4 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (/ (* (pow y-scale 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (pow a 4)))) (+ (* -1 (pow b 2)) (pow b 2)))))) (pow x-scale 2))) (+ (* -1/2 (/ (* (pow y-scale 4) (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2))))))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))))) (* (pow a 3) (pow x-scale 2)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (+ (* (pow b 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 2))))) (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))))) (pow a 2)) (+ (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))) (pow a 2))) (/ (* (pow y-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))) (pow a 2))))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))) (* a (pow x-scale 2)))))) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 2) (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 2))))))) a)) (* (pow angle 2) (+ (* 1/8 (+ (* -1/2 (/ (* a (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1 (/ (* (pow y-scale 2) (* (+ (* -1 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (/ (* (pow y-scale 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (pow a 4))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2))) (+ (* -1 (/ (* (pow y-scale 6) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))) (pow a 6))) (+ (* 1/2 (/ (* (pow y-scale 2) (* (+ (* -1 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (+ (* 1/4 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (/ (* (pow y-scale 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (pow a 4)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2))) (/ (* (pow y-scale 4) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (pow a 4))))) (+ (* -1 (pow b 2)) (pow b 2)))))) (pow x-scale 2))) (+ (* -1/2 (/ (* a (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (+ (* 1/4 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (/ (* (pow y-scale 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (pow a 4)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2))))))))))) (pow x-scale 2))) (+ (* -1/2 (/ (* (pow y-scale 4) (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (+ (* (pow b 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 2))))) (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))))) (pow a 2)) (+ (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))) (pow a 2))) (/ (* (pow y-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))) (pow a 2))))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))))))) (* (pow a 3) (pow x-scale 2)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (+ (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (+ (* (pow b 2) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))))) (pow y-scale 2)))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- b a) 2)))) (pow y-scale 2))) (/ (* (pow (+ a b) 2) (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- b a) 2))) (pow y-scale 2))))))) (pow a 2)) (+ (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))))) (pow a 2))) (+ (/ (* (pow y-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (+ (* (pow b 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 2))))) (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))))) (pow a 2)) (+ (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))) (pow a 2))) (/ (* (pow y-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))) (pow a 2)))))) (pow a 2)) (/ (* (pow y-scale 2) (* (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))) (pow a 2)))))) (+ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6))))))))) (* a (pow x-scale 2))))))) (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 2) (* (sqrt 8) (- (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 2)))))) (pow a 2))))))) a)))))))))))) |
(+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/4 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (+ (* 1/4 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* a (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))))))) (* (pow b 3) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))))) |
(+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (+ (* 1/4 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* a (+ (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))))) (* (pow b 3) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* a (+ (* 1/8 (+ (* -1/2 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow b 3) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))))) (* 1/8 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))) (* b (sin (* 1/180 (* angle (PI))))))))))))) |
(+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (+ (* 1/4 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* a (+ (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))))) (* (pow b 3) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* a (+ (* 1/8 (* a (+ (* -1 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))))) (* (pow b 5) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (pow b 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))))))) (+ (* 1/8 (+ (* -1/2 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow b 3) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))))) (* 1/8 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))) (* b (sin (* 1/180 (* angle (PI)))))))))))))) |
(* a (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(* a (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (+ (* 1/4 (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))))))) |
(* a (+ (* 1/8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (* (pow a 2) (cos (* 1/180 (* angle (PI))))))) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (+ (* 1/8 (/ (+ (* -1/2 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/4 (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))))))))) |
(* a (+ (* 1/8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (* (pow a 2) (cos (* 1/180 (* angle (PI))))))) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (+ (* 1/8 (/ (+ (* -1 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 b) (* 2 b))))))) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* 4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (+ (* -2 b) (* 2 b)))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (pow a 3))) (+ (* 1/8 (/ (+ (* -1/2 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/4 (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))))))))) |
(* -1 (* a (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))) |
(* -1 (* a (+ (* -1/4 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))) |
(* -1 (* a (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/8 (+ (* -1/2 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (* 1/8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (cos (* 1/180 (* angle (PI))))))) a)) (* 1/4 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) a)) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))) |
(* -1 (* a (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (/ (+ (* -1 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 b) (* 2 b))))))) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* 4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (+ (* -2 b) (* 2 b)))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) a)) (+ (* 1/8 (+ (* -1/2 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (* 1/8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (cos (* 1/180 (* angle (PI)))))))) a)) (* 1/4 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) a)) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))) |
(* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(/ (+ (* 1/8 (* (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* (pow x-scale 2) (* y-scale (* (sqrt 2) (sqrt 8)))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow x-scale 2)) |
(/ (+ (* 1/8 (* (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* (pow x-scale 2) (* y-scale (* (sqrt 2) (sqrt 8)))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow x-scale 2)) |
(/ (+ (* 1/8 (* (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* (pow x-scale 2) (* y-scale (* (sqrt 2) (sqrt 8)))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow x-scale 2)) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) |
(+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) |
(+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(* b (sqrt 2)) |
(+ (* 1/2 (/ (* (pow angle 2) (* (sqrt 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))))) b)) (* b (sqrt 2))) |
(+ (* b (sqrt 2)) (* (pow angle 2) (+ (* 1/2 (/ (* (sqrt 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) b)) (* 1/2 (/ (* (pow angle 2) (* (sqrt 2) (- (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (* 1/4 (/ (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2) (pow b 2)))))) b))))) |
(+ (* b (sqrt 2)) (* (pow angle 2) (+ (* 1/2 (/ (* (sqrt 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) b)) (* (pow angle 2) (+ (* 1/2 (/ (* (sqrt 2) (- (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (* 1/4 (/ (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2) (pow b 2))))) b)) (* 1/2 (/ (* (pow angle 2) (* (sqrt 2) (- (+ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6))))) (* 1/2 (/ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (- (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (* 1/4 (/ (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2) (pow b 2))))) (pow b 2)))))) b))))))) |
(* (sqrt 2) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) |
(* (sqrt 2) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) |
(* (sqrt 2) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) |
(* (sqrt 2) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) |
(* (sqrt 2) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) |
(* (sqrt 2) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) |
(* (sqrt 2) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) |
(* (sqrt 2) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) |
(* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))) |
(+ (* 1/2 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (sqrt 2))) (* a (sin (* 1/180 (* angle (PI))))))) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) |
(+ (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))) (* (pow b 2) (+ (* -1/8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (sqrt 2))) (* (pow a 3) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* 1/2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (sqrt 2)) (* a (sin (* 1/180 (* angle (PI)))))))))) |
(+ (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))) (* (pow b 2) (+ (* 1/2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (sqrt 2)) (* a (sin (* 1/180 (* angle (PI))))))) (* (pow b 2) (+ (* -1/8 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (sqrt 2)) (* (pow a 3) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* 1/16 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 6) (sqrt 2))) (* (pow a 5) (pow (sin (* 1/180 (* angle (PI)))) 5))))))))) |
(* b (* (cos (* 1/180 (* angle (PI)))) (sqrt 2))) |
(* b (+ (* 1/2 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 2))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* (cos (* 1/180 (* angle (PI)))) (sqrt 2)))) |
(* b (+ (* -1/8 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 2))) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/2 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 2))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* (cos (* 1/180 (* angle (PI)))) (sqrt 2))))) |
(* b (+ (* -1/8 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 2))) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/16 (/ (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (sqrt 2))) (* (pow b 6) (pow (cos (* 1/180 (* angle (PI)))) 5)))) (+ (* 1/2 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 2))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* (cos (* 1/180 (* angle (PI)))) (sqrt 2)))))) |
(* -1 (* b (* (cos (* 1/180 (* angle (PI)))) (sqrt 2)))) |
(* -1 (* b (+ (* 1/2 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 2))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* (cos (* 1/180 (* angle (PI)))) (sqrt 2))))) |
(* -1 (* b (+ (* -1/8 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 2))) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/2 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 2))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* (cos (* 1/180 (* angle (PI)))) (sqrt 2)))))) |
(* -1 (* b (+ (* -1/8 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 2))) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/16 (/ (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (sqrt 2))) (* (pow b 6) (pow (cos (* 1/180 (* angle (PI)))) 5)))) (+ (* 1/2 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 2))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* (cos (* 1/180 (* angle (PI)))) (sqrt 2))))))) |
(* b (* (cos (* 1/180 (* angle (PI)))) (sqrt 2))) |
(+ (* 1/2 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 2))) (* b (cos (* 1/180 (* angle (PI))))))) (* b (* (cos (* 1/180 (* angle (PI)))) (sqrt 2)))) |
(+ (* b (* (cos (* 1/180 (* angle (PI)))) (sqrt 2))) (* (pow a 2) (+ (* -1/8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 2))) (* (pow b 3) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (* 1/2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 2)) (* b (cos (* 1/180 (* angle (PI)))))))))) |
(+ (* b (* (cos (* 1/180 (* angle (PI)))) (sqrt 2))) (* (pow a 2) (+ (* 1/2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 2)) (* b (cos (* 1/180 (* angle (PI))))))) (* (pow a 2) (+ (* -1/8 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 2)) (* (pow b 3) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (* 1/16 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (sqrt 2))) (* (pow b 5) (pow (cos (* 1/180 (* angle (PI)))) 5))))))))) |
(* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))) |
(* a (+ (* 1/2 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (sqrt 2))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) |
(* a (+ (* -1/8 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (sqrt 2))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/2 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (sqrt 2))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) |
(* a (+ (* -1/8 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (sqrt 2))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/16 (/ (* (pow b 6) (* (pow (cos (* 1/180 (* angle (PI)))) 6) (sqrt 2))) (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 5)))) (+ (* 1/2 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (sqrt 2))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))) |
(* -1 (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) |
(* -1 (* a (+ (* 1/2 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (sqrt 2))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) |
(* -1 (* a (+ (* -1/8 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (sqrt 2))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/2 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (sqrt 2))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))) |
(* -1 (* a (+ (* -1/8 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (sqrt 2))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/16 (/ (* (pow b 6) (* (pow (cos (* 1/180 (* angle (PI)))) 6) (sqrt 2))) (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 5)))) (+ (* 1/2 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (sqrt 2))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))) |
1 |
(+ 1 (* -1/64800 (* (pow angle 2) (pow (PI) 2)))) |
(+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* 1/25194240000 (* (pow angle 2) (pow (PI) 4)))))) |
(+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/24488801280000000 (* (pow angle 2) (pow (PI) 6))) (* 1/25194240000 (pow (PI) 4))))))) |
(cos (* 1/180 (* angle (PI)))) |
(cos (* 1/180 (* angle (PI)))) |
(cos (* 1/180 (* angle (PI)))) |
(cos (* 1/180 (* angle (PI)))) |
(cos (* 1/180 (* angle (PI)))) |
(cos (* 1/180 (* angle (PI)))) |
(cos (* 1/180 (* angle (PI)))) |
(cos (* 1/180 (* angle (PI)))) |
(* 1/180 (* angle (PI))) |
(* angle (+ (* -1/34992000 (* (pow angle 2) (pow (PI) 3))) (* 1/180 (PI)))) |
(* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* 1/22674816000000 (* (pow angle 2) (pow (PI) 5))))))) |
(* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* (pow angle 2) (+ (* -1/30855889612800000000 (* (pow angle 2) (pow (PI) 7))) (* 1/22674816000000 (pow (PI) 5)))))))) |
(sin (* 1/180 (* angle (PI)))) |
(sin (* 1/180 (* angle (PI)))) |
(sin (* 1/180 (* angle (PI)))) |
(sin (* 1/180 (* angle (PI)))) |
(sin (* 1/180 (* angle (PI)))) |
(sin (* 1/180 (* angle (PI)))) |
(sin (* 1/180 (* angle (PI)))) |
(sin (* 1/180 (* angle (PI)))) |
(* y-scale (sqrt 2)) |
(* y-scale (sqrt 2)) |
(* y-scale (sqrt 2)) |
(* y-scale (sqrt 2)) |
(* y-scale (sqrt 2)) |
(* y-scale (sqrt 2)) |
(* y-scale (sqrt 2)) |
(* y-scale (sqrt 2)) |
(* y-scale (sqrt 2)) |
(* y-scale (sqrt 2)) |
(* y-scale (sqrt 2)) |
(* y-scale (sqrt 2)) |
(sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) |
(+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* 1/2 (* (* (pow a 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) |
(+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* (pow a 2) (+ (* 1/2 (* (* (pow a 2) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))) |
(+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* (pow a 2) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow a 2) (+ (* -1/4 (* (* (pow a 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))))))) |
(* (pow a 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) |
(* (pow a 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) |
(* (pow a 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow a 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))) |
(* (pow a 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* -1/4 (* (/ (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (pow a 6)) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow a 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))) |
(* (pow a 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) |
(* (pow a 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) |
(* (pow a 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow a 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))) |
(* (pow a 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* -1/4 (* (/ (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (pow a 6)) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow a 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))) |
(- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) |
(- (+ (* 1/2 (/ (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (pow b 2) (pow x-scale 2))) (/ (pow a 2) (pow y-scale 2))) |
(- (+ (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))) (/ (pow b 2) (pow x-scale 2))) (/ (pow a 2) (pow y-scale 2))) |
(- (+ (* (pow angle 2) (+ (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (/ (pow b 2) (pow x-scale 2))) (/ (pow a 2) (pow y-scale 2))) |
(sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) |
(sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) |
(sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) |
(sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) |
(sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) |
(sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) |
(sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) |
(sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) |
(sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) |
(+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* 1/2 (* (* (pow b 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) |
(+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* (pow b 2) (+ (* 1/2 (* (* (pow b 2) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))) |
(+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* (pow b 2) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow b 2) (+ (* -1/4 (* (* (pow b 2) (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))))))) |
(* (pow b 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) |
(* (pow b 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) |
(* (pow b 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow b 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))) |
(* (pow b 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* -1/4 (* (/ (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (pow b 6)) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow b 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))) |
(* (pow b 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) |
(* (pow b 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) |
(* (pow b 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow b 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))) |
(* (pow b 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* -1/4 (* (/ (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (pow b 6)) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow b 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))) |
(/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)) |
(/ (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)) |
(/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (+ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))) (pow x-scale 2)) |
(/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (+ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))))) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))) (pow x-scale 2)) |
(+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) |
(+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) |
(+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (* (pow x-scale 4) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) |
(+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 6) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (* (pow x-scale 4) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) |
(+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) |
(+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) |
(+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (* (pow x-scale 4) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) |
(+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 6) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (* (pow x-scale 4) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) |
(/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)) |
(/ (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)) |
(/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (+ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow y-scale 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (pow y-scale 2)) |
(/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (+ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow y-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))) (pow y-scale 2)) |
(+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) |
(+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) |
(+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (* (pow y-scale 4) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) |
(+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 6) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (* (pow y-scale 4) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) |
(+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) |
(+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) |
(+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (* (pow y-scale 4) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) |
(+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 6) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (* (pow y-scale 4) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
1 |
(+ 1 (* -1/64800 (* (pow angle 2) (pow (PI) 2)))) |
(+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* 1/25194240000 (* (pow angle 2) (pow (PI) 4)))))) |
(+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/24488801280000000 (* (pow angle 2) (pow (PI) 6))) (* 1/25194240000 (pow (PI) 4))))))) |
(cos (* 1/180 (* angle (PI)))) |
(cos (* 1/180 (* angle (PI)))) |
(cos (* 1/180 (* angle (PI)))) |
(cos (* 1/180 (* angle (PI)))) |
(cos (* 1/180 (* angle (PI)))) |
(cos (* 1/180 (* angle (PI)))) |
(cos (* 1/180 (* angle (PI)))) |
(cos (* 1/180 (* angle (PI)))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))) |
(+ (* 1/16 (* (/ (* a (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))) (* a (+ (* 1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* 1/8 (* (* a (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (+ (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (sqrt (/ 1 (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))) (* a (+ (* 1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* a (+ (* 1/8 (* (* a (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 (pow b 3)) (* 2 (pow b 3))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (* 1/4 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 (pow b 3)) (* 2 (pow b 3))) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (+ (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))) (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (+ (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))) (sqrt (/ 1 (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))))))) |
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) |
(* a (+ (* 1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))) (* a (* x-scale y-scale))) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) |
(* a (+ (* 1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))) (* a (* x-scale y-scale))) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))))))) (pow a 2)) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))))) |
(* a (+ (* 1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))) (* a (* x-scale y-scale))) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 b) (* 2 b)) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (* 1/4 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 b) (* 2 b)) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))))))) (pow a 3)) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))))))) (pow a 2)) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))))) |
(* -1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) |
(* -1 (* a (+ (* -1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))) (* a (* x-scale y-scale))) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))))) |
(* -1 (* a (+ (* -1 (/ (+ (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))))))) a) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))) (* 1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))))) a)) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))))) |
(* -1 (* a (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 b) (* 2 b)) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (* 1/4 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 b) (* 2 b)) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))))))) a) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))) (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))))))) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) a)) (* 1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))))) a)) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) |
(+ (* 1/16 (* (/ (* b (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* b (+ (* 1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* 1/8 (* (* b (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (+ (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (sqrt (/ 1 (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* b (+ (* 1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* b (+ (* 1/8 (* (* b (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 (pow a 3)) (* 2 (pow a 3))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (* 1/4 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 (pow a 3)) (* 2 (pow a 3))) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (+ (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (+ (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (sqrt (/ 1 (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))))))) |
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))) |
(* b (+ (* 1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))) (* b (* x-scale y-scale))) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) |
(* b (+ (* 1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))) (* b (* x-scale y-scale))) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))))))) (pow b 2)) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))))) |
(* b (+ (* 1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))) (* b (* x-scale y-scale))) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 a) (* 2 a)) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (* 1/4 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 a) (* 2 a)) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))))))) (pow b 3)) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))))))) (pow b 2)) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))))) |
(* -1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))) |
(* -1 (* b (+ (* -1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))) (* b (* x-scale y-scale))) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))))) |
(* -1 (* b (+ (* -1 (/ (+ (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))))))) b) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (* 1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))))) b)) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))))) |
(* -1 (* b (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 a) (* 2 a)) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (* 1/4 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 a) (* 2 a)) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))))))) b) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))))))) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) b)) (* 1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))))) b)) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))))) |
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))) |
(+ (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) |
(+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))))) |
(+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))) (pow x-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))))) |
(* -1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))) |
(* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) |
(* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))))) |
(* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))) (pow x-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))))) |
(* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))) |
(+ (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) |
(+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))))) |
(+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) |
(* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))) |
(* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) |
(* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))) (pow y-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))))) |
(* -1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) |
(* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) |
(* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))))) |
(* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))) (pow y-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))))) |
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) |
(+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))))))) (* b (sqrt 2)))) (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))) |
(+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/2 (/ (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))))) (* b (sqrt 2))))))) |
(+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))))) (* b (sqrt 2)))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow y-scale 2))) (+ (* -1/765275040000000 (/ (* (pow b 2) (pow (PI) 6)) (pow x-scale 2))) (+ (* 1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow x-scale 2))) (+ (* 1/765275040000000 (/ (* (pow b 2) (pow (PI) 6)) (pow y-scale 2))) (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))))) (+ (* 2 (* (- (+ (* -1/765275040000000 (/ (* (pow b 2) (pow (PI) 6)) (pow x-scale 2))) (* 1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow x-scale 2)))) (+ (* -1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow y-scale 2))) (* 1/765275040000000 (/ (* (pow b 2) (pow (PI) 6)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow (+ a b) 2) (* (+ (* 1/31886460000000 (pow (PI) 6)) (* 1/19131876000000 (pow (PI) 6))) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (* 1/2 (/ (* (pow x-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/2 (/ (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/2 (/ (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2)))))))) (* b (sqrt 2))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))) |
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* 1/90 (* angle (PI))) |
(* angle (+ (* -1/4374000 (* (pow angle 2) (pow (PI) 3))) (* 1/90 (PI)))) |
(* angle (+ (* 1/90 (PI)) (* (pow angle 2) (+ (* -1/4374000 (pow (PI) 3)) (* 1/708588000000 (* (pow angle 2) (pow (PI) 5))))))) |
(* angle (+ (* 1/90 (PI)) (* (pow angle 2) (+ (* -1/4374000 (pow (PI) 3)) (* (pow angle 2) (+ (* -1/241061637600000000 (* (pow angle 2) (pow (PI) 7))) (* 1/708588000000 (pow (PI) 5)))))))) |
(sin (* 1/90 (* angle (PI)))) |
(sin (* 1/90 (* angle (PI)))) |
(sin (* 1/90 (* angle (PI)))) |
(sin (* 1/90 (* angle (PI)))) |
(sin (* 1/90 (* angle (PI)))) |
(sin (* 1/90 (* angle (PI)))) |
(sin (* 1/90 (* angle (PI)))) |
(sin (* 1/90 (* angle (PI)))) |
1 |
(+ 1 (* -1/16200 (* (pow angle 2) (pow (PI) 2)))) |
(+ 1 (* (pow angle 2) (+ (* -1/16200 (pow (PI) 2)) (* 1/1574640000 (* (pow angle 2) (pow (PI) 4)))))) |
(+ 1 (* (pow angle 2) (+ (* -1/16200 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/382637520000000 (* (pow angle 2) (pow (PI) 6))) (* 1/1574640000 (pow (PI) 4))))))) |
(cos (* 1/90 (* angle (PI)))) |
(cos (* 1/90 (* angle (PI)))) |
(cos (* 1/90 (* angle (PI)))) |
(cos (* 1/90 (* angle (PI)))) |
(cos (* 1/90 (* angle (PI)))) |
(cos (* 1/90 (* angle (PI)))) |
(cos (* 1/90 (* angle (PI)))) |
(cos (* 1/90 (* angle (PI)))) |
(/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) |
(+ (* 4 (/ (* b (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (pow a 2))) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) |
(+ (* b (+ (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (pow a 2))) (* b (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) |
(+ (* b (+ (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (pow a 2))) (* b (- (+ (* b (- (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (pow a 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) |
(/ (* (pow b 2) (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) |
(* (pow b 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) b)) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) |
(* (pow b 2) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) b)) (+ (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4))))) |
(* (pow b 2) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) b)) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (pow b 3))) (+ (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* 4 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (+ (* -2 a) (* 2 a)))) (* (pow b 3) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) |
(/ (* (pow b 2) (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) |
(* (pow b 2) (+ (* -4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) b)) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) |
(* (pow b 2) (+ (* -1 (/ (+ (* -1 (/ (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) b)) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))))) b)) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) |
(* (pow b 2) (+ (* -1 (/ (+ (* -1 (/ (- (+ (* -1 (/ (- (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* 4 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (+ (* -2 a) (* 2 a)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) b)) (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) b)) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))))) b)) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) |
(* -2 (pow b 2)) |
(+ (* -2 (pow b 2)) (* (pow angle 2) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))) |
(+ (* -2 (pow b 2)) (* (pow angle 2) (- (+ (* (pow angle 2) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (+ (* (pow b 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 2))))) (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))))) (pow a 2)) (+ (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))) (pow a 2))) (/ (* (pow y-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))) (pow a 2))))) (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2))) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))) |
(+ (* -2 (pow b 2)) (* (pow angle 2) (- (+ (* (pow angle 2) (- (+ (* (pow angle 2) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (+ (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (+ (* (pow b 2) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))))) (pow y-scale 2)))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- b a) 2)))) (pow y-scale 2))) (/ (* (pow (+ a b) 2) (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- b a) 2))) (pow y-scale 2))))))) (pow a 2)) (+ (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))))) (pow a 2))) (+ (/ (* (pow y-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (+ (* (pow b 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 2))))) (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))))) (pow a 2)) (+ (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))) (pow a 2))) (/ (* (pow y-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))) (pow a 2)))))) (pow a 2)) (/ (* (pow y-scale 2) (* (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))) (pow a 2)))))) (/ (* (pow y-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (+ (* (pow b 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 2))))) (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))))) (pow a 2))) (+ (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))) (pow a 2))) (/ (* (pow y-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))) (pow a 2))))) (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2))) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))) |
(/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) |
(/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) |
(/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) |
(/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) |
(/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) |
(/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) |
(/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) |
(/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) |
(/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) |
(/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) |
(/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) |
(/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) |
(/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) |
(/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) |
(/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) |
(/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) |
(/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) |
(/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) |
(/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) |
(/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) |
(/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) |
(+ (* 4 (/ (* a (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (pow b 2))) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) |
(+ (* a (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (pow b 2))) (* a (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) |
(+ (* a (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (pow b 2))) (* a (- (+ (* a (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (pow b 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) |
(/ (* (pow a 2) (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) |
(* (pow a 2) (+ (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) a)) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) |
(* (pow a 2) (- (+ (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) a)) (+ (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4))))) |
(* (pow a 2) (- (+ (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) a)) (+ (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (pow a 3))) (+ (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (* 4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (+ (* -2 b) (* 2 b)))) (* (pow a 3) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) |
(/ (* (pow a 2) (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) |
(* (pow a 2) (+ (* -4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) a)) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) |
(* (pow a 2) (+ (* -1 (/ (+ (* -1 (/ (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (cos (* 1/180 (* angle (PI)))) 4))) a)) (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))))) a)) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) |
(* (pow a 2) (+ (* -1 (/ (+ (* -1 (/ (- (+ (* -1 (/ (- (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* 4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (+ (* -2 b) (* 2 b)))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) a)) (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (cos (* 1/180 (* angle (PI)))) 4))) a)) (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))))) a)) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) |
(+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) |
(+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (+ (* 4 (/ (* b (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) |
(+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* b (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (pow y-scale 2))) (* b (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))))))) |
(+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* b (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (pow y-scale 2))) (* b (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (+ (* 4 (/ (* b (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))))) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2)))))))))) |
(* (pow b 4) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) |
(* (pow b 4) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (* b (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) |
(* (pow b 4) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (pow b 2))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow b 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (* b (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) |
(* (pow b 4) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (pow b 2))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow b 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (* b (pow y-scale 2)))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* (pow b 3) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(* (pow b 4) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) |
(* (pow b 4) (+ (* -4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (* b (pow y-scale 2)))) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) |
(* (pow b 4) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (* -1 (/ (+ (* -1 (/ (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2)))) b)) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (pow y-scale 2)))) b)) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) |
(* (pow b 4) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (* -1 (/ (+ (* -1 (/ (+ (* -4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* b (pow y-scale 2)))) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) b)) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (pow y-scale 2)))) b)) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) |
(* -2 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) |
(+ (* -2 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))))) |
(+ (* -2 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* (pow angle 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (+ (* (pow b 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 2))))) (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))))))))) |
(+ (* -2 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* (pow angle 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (+ (* (pow b 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow angle 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (+ (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (+ (* (pow b 2) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))))) (pow y-scale 2)))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- b a) 2)))) (pow y-scale 2))) (/ (* (pow (+ a b) 2) (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- b a) 2))) (pow y-scale 2)))))))))))))) |
(+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) |
(+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) |
(+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) |
(+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) |
(+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) |
(+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) |
(+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) |
(+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) |
(/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (pow y-scale 2)) |
(/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (pow y-scale 2)) |
(/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (pow y-scale 2)) |
(/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (pow y-scale 2)) |
(/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (pow y-scale 2)) |
(/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (pow y-scale 2)) |
(/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (pow y-scale 2)) |
(/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (pow y-scale 2)) |
(/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (pow y-scale 2)) |
(/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (pow y-scale 2)) |
(/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (pow y-scale 2)) |
(/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (pow y-scale 2)) |
(+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) |
(+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (+ (* 4 (/ (* a (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) |
(+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* a (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (pow y-scale 2))) (* a (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))))))) |
(+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* a (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (pow y-scale 2))) (* a (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (+ (* 4 (/ (* a (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))))) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2)))))))))) |
(* (pow a 4) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) |
(* (pow a 4) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (* a (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) |
(* (pow a 4) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (pow a 2))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow a 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (* a (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) |
(* (pow a 4) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (pow a 2))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow a 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (* a (pow y-scale 2)))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* (pow a 3) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(* (pow a 4) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) |
(* (pow a 4) (+ (* -4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (* a (pow y-scale 2)))) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) |
(* (pow a 4) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (* -1 (/ (+ (* -1 (/ (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2)))) a)) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (pow y-scale 2)))) a)) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) |
(* (pow a 4) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (* -1 (/ (+ (* -1 (/ (+ (* -4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* a (pow y-scale 2)))) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) a)) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (pow y-scale 2)))) a)) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) |
| Outputs |
|---|
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) |
(+ (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) |
(fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 b b) (*.f64 #s(literal 1/8 binary64) (fma.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 b b) (*.f64 #s(literal 1/8 binary64) (fma.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))))))) |
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) |
(* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))) |
(*.f64 b (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 b b)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))))) |
(* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) |
(*.f64 b (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 b b)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))))))) (pow.f64 b #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))))))) |
(* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))))) |
(*.f64 b (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 b b)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))))))) (pow.f64 b #s(literal 6 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))))))) (pow.f64 b #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))))))) |
(* -1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) |
(*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) |
(* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) |
(neg.f64 (*.f64 b (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 b b)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))))))) |
(* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))))) |
(neg.f64 (*.f64 b (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 b b)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))))))) (pow.f64 b #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))))))) |
(* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))))) |
(neg.f64 (*.f64 b (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 b b)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))))))) (pow.f64 b #s(literal 6 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))))))) (pow.f64 b #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) |
(+ (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) |
(fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (*.f64 a a) (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 a a) (*.f64 #s(literal 1/8 binary64) (fma.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 (*.f64 a a) (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 a a) (*.f64 #s(literal 1/8 binary64) (fma.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 (*.f64 a a) (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))))))) |
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) |
(* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) |
(*.f64 a (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 a a)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))))) |
(* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) |
(*.f64 a (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 a a)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))))))) (pow.f64 a #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))))))) |
(* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))) |
(*.f64 a (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 a a)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))))))) (pow.f64 a #s(literal 6 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))))))) (pow.f64 a #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))))))) |
(* -1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) |
(*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 a (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) |
(* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) |
(neg.f64 (*.f64 a (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 a a)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))))))) |
(* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))) |
(neg.f64 (*.f64 a (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 a a)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))))))) (pow.f64 a #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))))))) |
(* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))))) |
(neg.f64 (*.f64 a (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 a a)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))))))) (pow.f64 a #s(literal 6 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))))))) (pow.f64 a #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))))))))) |
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) |
(+ (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) |
(fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) |
(+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 #s(literal 1/8 binary64) (fma.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))))))) |
(+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 #s(literal 1/8 binary64) (fma.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) |
(*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))) (pow.f64 x-scale #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) |
(*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))) (pow.f64 x-scale #s(literal 6 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))) (pow.f64 x-scale #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))))) |
(* -1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) |
(* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) |
(neg.f64 (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))))) |
(* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) |
(neg.f64 (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))) (pow.f64 x-scale #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))))) |
(* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))))) |
(neg.f64 (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))) (pow.f64 x-scale #s(literal 6 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))) (pow.f64 x-scale #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))))))) |
(* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) |
(+ (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) |
(fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) |
(+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 (*.f64 y-scale y-scale) (*.f64 #s(literal 1/8 binary64) (fma.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))))))) |
(+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 y-scale y-scale) (*.f64 #s(literal 1/8 binary64) (fma.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) |
(* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) |
(*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 y-scale y-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))) |
(* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) |
(*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 y-scale y-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))) (pow.f64 y-scale #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))))) |
(* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) |
(*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 y-scale y-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)))))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))) (pow.f64 y-scale #s(literal 6 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))) (pow.f64 y-scale #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))))) |
(* -1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) |
(* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) |
(neg.f64 (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 y-scale y-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))))) |
(* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) |
(neg.f64 (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 y-scale y-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))) (pow.f64 y-scale #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))))) |
(* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))))) |
(neg.f64 (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 y-scale y-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)))))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))) (pow.f64 y-scale #s(literal 6 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))) (pow.f64 y-scale #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))))))) |
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))))))) (* b (sqrt 2)))) (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))) |
(fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 angle angle) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))))))))) (*.f64 b (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))) |
(+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))))) (* b (sqrt 2))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 angle angle) (*.f64 #s(literal 1/8 binary64) (+.f64 (/.f64 (*.f64 (*.f64 angle angle) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal -1/787320000 binary64)) (pow.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))))))) (*.f64 b (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))))))) (*.f64 b (sqrt.f64 #s(literal 2 binary64)))))))) |
(+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))))) (* b (sqrt 2)))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))))) (* 1/2 (/ (* (pow x-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2)))))))) (* b (sqrt 2))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))))))) (*.f64 b (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 angle angle) (*.f64 #s(literal 1/8 binary64) (+.f64 (/.f64 (*.f64 (*.f64 angle angle) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)))))) (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (fma.f64 #s(literal 1/102036672000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (+.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal -1/787320000 binary64)) (pow.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (*.f64 y-scale y-scale)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))))) (+.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal -1/787320000 binary64)) (pow.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))))) (*.f64 (*.f64 b b) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))))))) (*.f64 b (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal -1/787320000 binary64)) (pow.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))))))) (*.f64 b (sqrt.f64 #s(literal 2 binary64)))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) |
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(+ (* 1/8 (/ (* (pow angle 2) (* y-scale (* (sqrt 2) (* (sqrt 8) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))))))) b)) (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))) |
(fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 angle angle) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))))))))) b) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))) |
(+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* y-scale (* (sqrt 2) (* (sqrt 8) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))))) b)) (* 1/8 (/ (* (pow angle 2) (* y-scale (* (sqrt 2) (* (sqrt 8) (- (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (* 1/4 (/ (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2) (pow b 2)))))))) b))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 angle angle) (*.f64 #s(literal 1/8 binary64) (+.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64)))))))) b) (/.f64 (*.f64 (*.f64 angle angle) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64)))))) (*.f64 b b)))))))) b))))) |
(+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* y-scale (* (sqrt 2) (* (sqrt 8) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))))) b)) (* (pow angle 2) (+ (* 1/8 (/ (* y-scale (* (sqrt 2) (* (sqrt 8) (- (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (* 1/4 (/ (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2) (pow b 2))))))) b)) (* 1/8 (/ (* (pow angle 2) (* y-scale (* (sqrt 2) (* (sqrt 8) (- (+ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6))))) (* 1/2 (/ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (- (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (* 1/4 (/ (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2) (pow b 2))))) (pow b 2)))))))) b))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64)))))))) b) (*.f64 (*.f64 angle angle) (*.f64 #s(literal 1/8 binary64) (+.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64)))))) (*.f64 b b))))))) b) (/.f64 (*.f64 (*.f64 angle angle) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (fma.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))))) (+.f64 (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64)))))) (*.f64 b b))))) (*.f64 b b)))))))) b))))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) |
(* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 a (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))) |
(+ (* 1/8 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* a (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))) |
(fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 y-scale (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 a (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 a (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))) |
(+ (* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (* (pow b 2) (+ (* -1/32 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow a 3) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* 1/8 (/ (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (* a (sin (* 1/180 (* angle (PI)))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 a (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 y-scale (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 (*.f64 a (*.f64 a a)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 a (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) |
(+ (* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (* (pow b 2) (+ (* 1/8 (/ (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (* a (sin (* 1/180 (* angle (PI))))))) (* (pow b 2) (+ (* -1/32 (/ (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8)))) (* (pow a 3) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* 1/64 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 6) (* (sqrt 2) (sqrt 8))))) (* (pow a 5) (pow (sin (* 1/180 (* angle (PI)))) 5))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 a (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 a (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 a (*.f64 a a)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/64 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 y-scale (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 (pow.f64 a #s(literal 5 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)))))))))) |
(* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))) |
(* b (+ (* 1/8 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))) |
(*.f64 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 (*.f64 b b) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))) |
(* b (+ (* -1/32 (/ (* (pow a 4) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/8 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))) |
(*.f64 b (fma.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 (*.f64 b b) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))) |
(* b (+ (* -1/32 (/ (* (pow a 4) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/64 (/ (* (pow a 6) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 6) (* (sqrt 2) (sqrt 8))))) (* (pow b 6) (pow (cos (* 1/180 (* angle (PI)))) 5)))) (+ (* 1/8 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))) |
(*.f64 b (fma.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 (*.f64 b b) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))))) |
(* -1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(*.f64 #s(literal -1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))) |
(* -1 (* b (+ (* 1/8 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))) |
(neg.f64 (*.f64 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 (*.f64 b b) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))) |
(* -1 (* b (+ (* -1/32 (/ (* (pow a 4) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/8 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))) |
(neg.f64 (*.f64 b (fma.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 (*.f64 b b) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))))) |
(* -1 (* b (+ (* -1/32 (/ (* (pow a 4) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/64 (/ (* (pow a 6) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 6) (* (sqrt 2) (sqrt 8))))) (* (pow b 6) (pow (cos (* 1/180 (* angle (PI)))) 5)))) (+ (* 1/8 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))))) |
(neg.f64 (*.f64 b (fma.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 (*.f64 b b) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))))) |
(* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))) |
(+ (* 1/8 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* b (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))) |
(fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 b (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))) |
(+ (* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (* (pow a 2) (+ (* -1/32 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow b 3) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (* 1/8 (/ (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (* b (cos (* 1/180 (* angle (PI)))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 (*.f64 b (*.f64 b b)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 b (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) |
(+ (* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (* (pow a 2) (+ (* 1/8 (/ (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (* b (cos (* 1/180 (* angle (PI))))))) (* (pow a 2) (+ (* -1/32 (/ (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8)))) (* (pow b 3) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (* 1/64 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 6) (* (sqrt 2) (sqrt 8))))) (* (pow b 5) (pow (cos (* 1/180 (* angle (PI)))) 5))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 b (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 b (*.f64 b b)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/64 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 (pow.f64 b #s(literal 5 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)))))))))) |
(* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 a (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))) |
(* a (+ (* 1/8 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))) |
(*.f64 a (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 y-scale (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))) |
(* a (+ (* -1/32 (/ (* (pow b 4) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/8 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))) |
(*.f64 a (fma.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 y-scale (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 y-scale (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))) |
(* a (+ (* -1/32 (/ (* (pow b 4) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/64 (/ (* (pow b 6) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 6) (* (sqrt 2) (sqrt 8))))) (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 5)))) (+ (* 1/8 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))) |
(*.f64 a (fma.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 y-scale (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 6 binary64)) (*.f64 y-scale (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 y-scale (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))))) |
(* -1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(*.f64 #s(literal -1/4 binary64) (*.f64 a (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))) |
(* -1 (* a (+ (* 1/8 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))) |
(neg.f64 (*.f64 a (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 y-scale (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))) |
(* -1 (* a (+ (* -1/32 (/ (* (pow b 4) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/8 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))) |
(neg.f64 (*.f64 a (fma.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 y-scale (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 y-scale (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))))) |
(* -1 (* a (+ (* -1/32 (/ (* (pow b 4) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/64 (/ (* (pow b 6) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 6) (* (sqrt 2) (sqrt 8))))) (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 5)))) (+ (* 1/8 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))))) |
(neg.f64 (*.f64 a (fma.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 y-scale (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 6 binary64)) (*.f64 y-scale (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 y-scale (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))))) |
(* 1/4 (* y-scale (sqrt 8))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) |
(* 1/4 (* y-scale (sqrt 8))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) |
(* 1/4 (* y-scale (sqrt 8))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) |
(* 1/4 (* y-scale (sqrt 8))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) |
(* 1/4 (* y-scale (sqrt 8))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) |
(* 1/4 (* y-scale (sqrt 8))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) |
(* 1/4 (* y-scale (sqrt 8))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) |
(* 1/4 (* y-scale (sqrt 8))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) |
(* 1/4 (* y-scale (sqrt 8))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) |
(* 1/4 (* y-scale (sqrt 8))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) |
(* 1/4 (* y-scale (sqrt 8))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) |
(* 1/4 (* y-scale (sqrt 8))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) |
(* y-scale (sqrt 8)) |
(*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) |
(* y-scale (sqrt 8)) |
(*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) |
(* y-scale (sqrt 8)) |
(*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) |
(* y-scale (sqrt 8)) |
(*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) |
(* y-scale (sqrt 8)) |
(*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) |
(* y-scale (sqrt 8)) |
(*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) |
(* y-scale (sqrt 8)) |
(*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) |
(* y-scale (sqrt 8)) |
(*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) |
(* y-scale (sqrt 8)) |
(*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) |
(* y-scale (sqrt 8)) |
(*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) |
(* y-scale (sqrt 8)) |
(*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) |
(* y-scale (sqrt 8)) |
(*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) |
(+ (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) |
(fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 b b) (*.f64 #s(literal 1/8 binary64) (fma.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 b b) (*.f64 #s(literal 1/8 binary64) (fma.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))))))) |
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) |
(* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))) |
(*.f64 b (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 b b)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))))) |
(* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) |
(*.f64 b (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 b b)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))))))) (pow.f64 b #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))))))) |
(* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))))) |
(*.f64 b (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 b b)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))))))) (pow.f64 b #s(literal 6 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))))))) (pow.f64 b #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))))))) |
(* -1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) |
(*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) |
(* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) |
(neg.f64 (*.f64 b (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 b b)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))))))) |
(* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))))) |
(neg.f64 (*.f64 b (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 b b)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))))))) (pow.f64 b #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))))))) |
(* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))))) |
(neg.f64 (*.f64 b (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 b b)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))))))) (pow.f64 b #s(literal 6 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))))))) (pow.f64 b #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) |
(+ (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) |
(fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (*.f64 a a) (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 a a) (*.f64 #s(literal 1/8 binary64) (fma.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 (*.f64 a a) (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 a a) (*.f64 #s(literal 1/8 binary64) (fma.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 (*.f64 a a) (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))))))) |
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) |
(* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) |
(*.f64 a (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 a a)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))))) |
(* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) |
(*.f64 a (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 a a)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))))))) (pow.f64 a #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))))))) |
(* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))) |
(*.f64 a (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 a a)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))))))) (pow.f64 a #s(literal 6 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))))))) (pow.f64 a #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))))))) |
(* -1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) |
(*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 a (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) |
(* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) |
(neg.f64 (*.f64 a (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 a a)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))))))) |
(* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))) |
(neg.f64 (*.f64 a (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 a a)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))))))) (pow.f64 a #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))))))) |
(* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))))) |
(neg.f64 (*.f64 a (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 a a)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))))))) (pow.f64 a #s(literal 6 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))))))) (pow.f64 a #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))))))))) |
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) |
(+ (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) |
(fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) |
(+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 #s(literal 1/8 binary64) (fma.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))))))) |
(+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 #s(literal 1/8 binary64) (fma.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) |
(*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))) (pow.f64 x-scale #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) |
(*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))) (pow.f64 x-scale #s(literal 6 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))) (pow.f64 x-scale #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))))) |
(* -1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) |
(* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) |
(neg.f64 (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))))) |
(* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) |
(neg.f64 (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))) (pow.f64 x-scale #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))))) |
(* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))))) |
(neg.f64 (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))) (pow.f64 x-scale #s(literal 6 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))) (pow.f64 x-scale #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))))))) |
(* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) |
(+ (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) |
(fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) |
(+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 (*.f64 y-scale y-scale) (*.f64 #s(literal 1/8 binary64) (fma.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))))))) |
(+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 y-scale y-scale) (*.f64 #s(literal 1/8 binary64) (fma.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) |
(* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) |
(*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 y-scale y-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))) |
(* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) |
(*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 y-scale y-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))) (pow.f64 y-scale #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))))) |
(* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) |
(*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 y-scale y-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)))))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))) (pow.f64 y-scale #s(literal 6 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))) (pow.f64 y-scale #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))))) |
(* -1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) |
(* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) |
(neg.f64 (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 y-scale y-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))))) |
(* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) |
(neg.f64 (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 y-scale y-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))) (pow.f64 y-scale #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))))) |
(* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))))) |
(neg.f64 (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 y-scale y-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)))))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))) (pow.f64 y-scale #s(literal 6 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))) (pow.f64 y-scale #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))))))) |
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))))))) (* b (sqrt 2)))) (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))) |
(fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 angle angle) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))))))))) (*.f64 b (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))) |
(+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))))) (* b (sqrt 2))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 angle angle) (*.f64 #s(literal 1/8 binary64) (+.f64 (/.f64 (*.f64 (*.f64 angle angle) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal -1/787320000 binary64)) (pow.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))))))) (*.f64 b (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))))))) (*.f64 b (sqrt.f64 #s(literal 2 binary64)))))))) |
(+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))))) (* b (sqrt 2)))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))))) (* 1/2 (/ (* (pow x-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2)))))))) (* b (sqrt 2))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))))))) (*.f64 b (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 angle angle) (*.f64 #s(literal 1/8 binary64) (+.f64 (/.f64 (*.f64 (*.f64 angle angle) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)))))) (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (fma.f64 #s(literal 1/102036672000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (+.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal -1/787320000 binary64)) (pow.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (*.f64 y-scale y-scale)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))))) (+.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal -1/787320000 binary64)) (pow.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))))) (*.f64 (*.f64 b b) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))))))) (*.f64 b (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal -1/787320000 binary64)) (pow.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))))))) (*.f64 b (sqrt.f64 #s(literal 2 binary64)))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))) |
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(* 1/4 b) |
(*.f64 #s(literal 1/4 binary64) b) |
(* 1/4 b) |
(*.f64 #s(literal 1/4 binary64) b) |
(* 1/4 b) |
(*.f64 #s(literal 1/4 binary64) b) |
(* 1/4 b) |
(*.f64 #s(literal 1/4 binary64) b) |
(* 1/4 b) |
(*.f64 #s(literal 1/4 binary64) b) |
(* 1/4 b) |
(*.f64 #s(literal 1/4 binary64) b) |
(* 1/4 b) |
(*.f64 #s(literal 1/4 binary64) b) |
(* 1/4 b) |
(*.f64 #s(literal 1/4 binary64) b) |
(* 1/4 b) |
(*.f64 #s(literal 1/4 binary64) b) |
(* 1/4 b) |
(*.f64 #s(literal 1/4 binary64) b) |
(* 1/4 b) |
(*.f64 #s(literal 1/4 binary64) b) |
(* 1/4 b) |
(*.f64 #s(literal 1/4 binary64) b) |
(* y-scale (* (sqrt 2) (sqrt 8))) |
(*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) |
(* y-scale (* (sqrt 2) (sqrt 8))) |
(*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) |
(* y-scale (* (sqrt 2) (sqrt 8))) |
(*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) |
(* y-scale (* (sqrt 2) (sqrt 8))) |
(*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) |
(* y-scale (* (sqrt 2) (sqrt 8))) |
(*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) |
(* y-scale (* (sqrt 2) (sqrt 8))) |
(*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) |
(* y-scale (* (sqrt 2) (sqrt 8))) |
(*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) |
(* y-scale (* (sqrt 2) (sqrt 8))) |
(*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) |
(* y-scale (* (sqrt 2) (sqrt 8))) |
(*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) |
(* y-scale (* (sqrt 2) (sqrt 8))) |
(*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) |
(* y-scale (* (sqrt 2) (sqrt 8))) |
(*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) |
(* y-scale (* (sqrt 2) (sqrt 8))) |
(*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) |
(* (pow x-scale 2) (pow y-scale 2)) |
(*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) |
(* (pow x-scale 2) (pow y-scale 2)) |
(*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) |
(* (pow x-scale 2) (pow y-scale 2)) |
(*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) |
(* (pow x-scale 2) (pow y-scale 2)) |
(*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) |
(* (pow x-scale 2) (pow y-scale 2)) |
(*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) |
(* (pow x-scale 2) (pow y-scale 2)) |
(*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) |
(* (pow x-scale 2) (pow y-scale 2)) |
(*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) |
(* (pow x-scale 2) (pow y-scale 2)) |
(*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) |
(* (pow x-scale 2) (pow y-scale 2)) |
(*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) |
(* (pow x-scale 2) (pow y-scale 2)) |
(*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) |
(* (pow x-scale 2) (pow y-scale 2)) |
(*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) |
(* (pow x-scale 2) (pow y-scale 2)) |
(*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) |
(* (pow x-scale 2) (pow y-scale 2)) |
(*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) |
(* (pow x-scale 2) (pow y-scale 2)) |
(*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) |
(* (pow x-scale 2) (pow y-scale 2)) |
(*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) |
(* (pow x-scale 2) (pow y-scale 2)) |
(*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) |
(* (pow x-scale 2) (pow y-scale 2)) |
(*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) |
(* (pow x-scale 2) (pow y-scale 2)) |
(*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) |
(* (pow x-scale 2) (pow y-scale 2)) |
(*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) |
(* (pow x-scale 2) (pow y-scale 2)) |
(*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) |
(* (pow x-scale 2) (pow y-scale 2)) |
(*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) |
(* (pow x-scale 2) (pow y-scale 2)) |
(*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) |
(* (pow x-scale 2) (pow y-scale 2)) |
(*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) |
(* (pow x-scale 2) (pow y-scale 2)) |
(*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) |
(+ (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) |
(fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 b b) (*.f64 #s(literal 1/8 binary64) (fma.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 b b) (*.f64 #s(literal 1/8 binary64) (fma.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))))))) |
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) |
(* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))) |
(*.f64 b (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 b b)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))))) |
(* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) |
(*.f64 b (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 b b)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))))))) (pow.f64 b #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))))))) |
(* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))))) |
(*.f64 b (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 b b)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))))))) (pow.f64 b #s(literal 6 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))))))) (pow.f64 b #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))))))) |
(* -1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) |
(*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) |
(* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) |
(neg.f64 (*.f64 b (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 b b)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))))))) |
(* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))))) |
(neg.f64 (*.f64 b (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 b b)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))))))) (pow.f64 b #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))))))) |
(* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))))) |
(neg.f64 (*.f64 b (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 b b)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))))))) (pow.f64 b #s(literal 6 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))))))) (pow.f64 b #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) |
(+ (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) |
(fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (*.f64 a a) (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 a a) (*.f64 #s(literal 1/8 binary64) (fma.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 (*.f64 a a) (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 a a) (*.f64 #s(literal 1/8 binary64) (fma.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 (*.f64 a a) (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))))))) |
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) |
(* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) |
(*.f64 a (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 a a)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))))) |
(* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) |
(*.f64 a (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 a a)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))))))) (pow.f64 a #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))))))) |
(* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))) |
(*.f64 a (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 a a)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))))))) (pow.f64 a #s(literal 6 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))))))) (pow.f64 a #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))))))) |
(* -1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) |
(*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 a (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) |
(* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) |
(neg.f64 (*.f64 a (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 a a)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))))))) |
(* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))) |
(neg.f64 (*.f64 a (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 a a)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))))))) (pow.f64 a #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))))))) |
(* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))))) |
(neg.f64 (*.f64 a (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 a a)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))))))) (pow.f64 a #s(literal 6 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))))))) (pow.f64 a #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))))))))) |
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) |
(+ (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) |
(fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) |
(+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 #s(literal 1/8 binary64) (fma.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))))))) |
(+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 #s(literal 1/8 binary64) (fma.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) |
(*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))) (pow.f64 x-scale #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) |
(*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))) (pow.f64 x-scale #s(literal 6 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))) (pow.f64 x-scale #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))))) |
(* -1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) |
(* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) |
(neg.f64 (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))))) |
(* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) |
(neg.f64 (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))) (pow.f64 x-scale #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))))) |
(* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))))) |
(neg.f64 (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))) (pow.f64 x-scale #s(literal 6 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))) (pow.f64 x-scale #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))))))) |
(* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) |
(+ (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) |
(fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) |
(+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 (*.f64 y-scale y-scale) (*.f64 #s(literal 1/8 binary64) (fma.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))))))) |
(+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 y-scale y-scale) (*.f64 #s(literal 1/8 binary64) (fma.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) |
(* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) |
(*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 y-scale y-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))) |
(* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) |
(*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 y-scale y-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))) (pow.f64 y-scale #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))))) |
(* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) |
(*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 y-scale y-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)))))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))) (pow.f64 y-scale #s(literal 6 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))) (pow.f64 y-scale #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))))) |
(* -1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) |
(* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) |
(neg.f64 (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 y-scale y-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))))) |
(* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) |
(neg.f64 (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 y-scale y-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))) (pow.f64 y-scale #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))))) |
(* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))))) |
(neg.f64 (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 y-scale y-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)))))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))) (pow.f64 y-scale #s(literal 6 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))) (pow.f64 y-scale #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))))))) |
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))))))) (* b (sqrt 2)))) (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))) |
(fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 angle angle) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))))))))) (*.f64 b (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))) |
(+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))))) (* b (sqrt 2))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 angle angle) (*.f64 #s(literal 1/8 binary64) (+.f64 (/.f64 (*.f64 (*.f64 angle angle) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal -1/787320000 binary64)) (pow.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))))))) (*.f64 b (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))))))) (*.f64 b (sqrt.f64 #s(literal 2 binary64)))))))) |
(+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))))) (* b (sqrt 2)))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))))) (* 1/2 (/ (* (pow x-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2)))))))) (* b (sqrt 2))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))))))) (*.f64 b (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 angle angle) (*.f64 #s(literal 1/8 binary64) (+.f64 (/.f64 (*.f64 (*.f64 angle angle) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)))))) (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (fma.f64 #s(literal 1/102036672000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (+.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal -1/787320000 binary64)) (pow.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (*.f64 y-scale y-scale)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))))) (+.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal -1/787320000 binary64)) (pow.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))))) (*.f64 (*.f64 b b) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))))))) (*.f64 b (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal -1/787320000 binary64)) (pow.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))))))) (*.f64 b (sqrt.f64 #s(literal 2 binary64)))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))) |
(/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) |
(/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) |
(+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) |
(+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) |
(+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) |
(+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) |
(+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) |
(+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) |
(/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) |
(/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) |
(* (pow a 2) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) |
(*.f64 (*.f64 a a) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (*.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) |
(* (pow a 2) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) |
(*.f64 (*.f64 a a) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (*.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) |
(* (pow a 2) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) |
(*.f64 (*.f64 a a) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (*.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) |
(/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) |
(/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) |
(* (pow a 2) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) |
(*.f64 (*.f64 a a) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (*.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) |
(* (pow a 2) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) |
(*.f64 (*.f64 a a) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (*.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) |
(* (pow a 2) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) |
(*.f64 (*.f64 a a) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (*.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) |
(/ (pow b 2) (pow x-scale 2)) |
(/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) |
(+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))))) (/ (pow b 2) (pow x-scale 2))) |
(fma.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))) |
(+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (/ (pow b 2) (pow x-scale 2))) |
(fma.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale)))))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))) |
(+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* (pow angle 2) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2)))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))))) (/ (pow b 2) (pow x-scale 2))) |
(fma.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (fma.f64 (*.f64 angle angle) (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale))))))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))) |
(/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)) |
(/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale x-scale)) |
(/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)) |
(/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale x-scale)) |
(/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)) |
(/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale x-scale)) |
(/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)) |
(/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale x-scale)) |
(/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)) |
(/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale x-scale)) |
(/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)) |
(/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale x-scale)) |
(/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)) |
(/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale x-scale)) |
(/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)) |
(/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale x-scale)) |
(/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) |
(/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) |
(+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) |
(+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) |
(+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) |
(+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) |
(+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) |
(+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) |
(/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) |
(/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) |
(* (pow b 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) |
(*.f64 (*.f64 b b) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (*.f64 x-scale x-scale))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) |
(* (pow b 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) |
(*.f64 (*.f64 b b) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (*.f64 x-scale x-scale))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) |
(* (pow b 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) |
(*.f64 (*.f64 b b) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (*.f64 x-scale x-scale))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) |
(/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) |
(/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) |
(* (pow b 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) |
(*.f64 (*.f64 b b) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (*.f64 x-scale x-scale))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) |
(* (pow b 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) |
(*.f64 (*.f64 b b) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (*.f64 x-scale x-scale))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) |
(* (pow b 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) |
(*.f64 (*.f64 b b) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (*.f64 x-scale x-scale))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) |
(/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)) |
(/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale x-scale)) |
(/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)) |
(/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale x-scale)) |
(/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)) |
(/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale x-scale)) |
(/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)) |
(/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale x-scale)) |
(/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)) |
(/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale x-scale)) |
(/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)) |
(/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale x-scale)) |
(/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)) |
(/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale x-scale)) |
(/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)) |
(/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale x-scale)) |
(/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)) |
(/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale x-scale)) |
(/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)) |
(/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale x-scale)) |
(/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)) |
(/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale x-scale)) |
(/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)) |
(/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale x-scale)) |
(/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) |
(/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) |
(+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) |
(+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) |
(+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) |
(+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) |
(+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) |
(+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) |
(/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) |
(/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) |
(* (pow a 2) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) |
(*.f64 (*.f64 a a) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) |
(* (pow a 2) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) |
(*.f64 (*.f64 a a) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) |
(* (pow a 2) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) |
(*.f64 (*.f64 a a) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) |
(/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) |
(/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) |
(* (pow a 2) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) |
(*.f64 (*.f64 a a) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) |
(* (pow a 2) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) |
(*.f64 (*.f64 a a) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) |
(* (pow a 2) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) |
(*.f64 (*.f64 a a) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) |
(/ (pow a 2) (pow y-scale 2)) |
(/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) |
(+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (pow a 2) (pow y-scale 2))) |
(fma.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) |
(+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))))) (/ (pow a 2) (pow y-scale 2))) |
(fma.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)))))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) |
(+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* (pow angle 2) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))))) (/ (pow a 2) (pow y-scale 2))) |
(fma.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 angle angle) (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))))))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) |
(/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)) |
(/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) |
(/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)) |
(/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) |
(/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)) |
(/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) |
(/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)) |
(/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) |
(/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)) |
(/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) |
(/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)) |
(/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) |
(/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)) |
(/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) |
(/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)) |
(/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) |
(/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) |
(/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) |
(+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) |
(+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) |
(+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) |
(+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) |
(+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) |
(+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) |
(/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) |
(/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) |
(* (pow b 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) |
(*.f64 (*.f64 b b) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (*.f64 y-scale y-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) |
(* (pow b 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) |
(*.f64 (*.f64 b b) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (*.f64 y-scale y-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) |
(* (pow b 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) |
(*.f64 (*.f64 b b) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (*.f64 y-scale y-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) |
(/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) |
(/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) |
(* (pow b 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) |
(*.f64 (*.f64 b b) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (*.f64 y-scale y-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) |
(* (pow b 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) |
(*.f64 (*.f64 b b) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (*.f64 y-scale y-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) |
(* (pow b 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) |
(*.f64 (*.f64 b b) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (*.f64 y-scale y-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) |
(/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)) |
(/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) |
(/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)) |
(/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) |
(/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)) |
(/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) |
(/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)) |
(/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) |
(/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)) |
(/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) |
(/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)) |
(/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) |
(/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)) |
(/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) |
(/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)) |
(/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) |
(/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)) |
(/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) |
(/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)) |
(/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) |
(/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)) |
(/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) |
(/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)) |
(/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) |
(* (* (pow a 2) (* (pow b 2) (* x-scale (* y-scale (sqrt 8))))) (sqrt (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) |
(*.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))))) |
(* (pow b 2) (+ (* 1/4 (* (/ (* (pow a 2) (* b (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* (* (pow a 2) (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) |
(*.f64 (*.f64 b b) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 b (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64)))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 (*.f64 (*.f64 a a) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))))))) |
(* (pow b 2) (+ (* b (+ (* 1/4 (* (/ (* (pow a 2) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* 1/2 (* (* (pow a 2) (* b (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (+ (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))))) (sqrt (/ 1 (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) (* (* (pow a 2) (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) |
(*.f64 (*.f64 b b) (fma.f64 b (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 a a) (*.f64 b (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64)) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)))))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64)) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))))) (*.f64 (*.f64 (*.f64 a a) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))))))) |
(* (pow b 2) (+ (* b (+ (* 1/4 (* (/ (* (pow a 2) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* b (+ (* 1/2 (* (* (pow a 2) (* b (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 (pow a 3)) (* 2 (pow a 3))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (* 1/4 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 (pow a 3)) (* 2 (pow a 3))) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (+ (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))))))) (sqrt (/ 1 (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (* 1/2 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (+ (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (sqrt (/ 1 (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))))) (* (* (pow a 2) (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) |
(*.f64 (*.f64 b b) (fma.f64 b (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 b (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (*.f64 a a) (*.f64 b (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a #s(literal 0 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64)) (+.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64)) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64)) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)))))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64)) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 a a) (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64)) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)))))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64)) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))))))) (*.f64 (*.f64 (*.f64 a a) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))))))) |
(* (* (pow a 2) (* (pow b 3) (* x-scale (* y-scale (sqrt 8))))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) |
(*.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b (*.f64 b b)) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))))) |
(* (pow b 3) (+ (* 1/4 (* (/ (* (pow a 2) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a))))) (* b (* x-scale y-scale))) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (* (* (pow a 2) (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) |
(*.f64 (*.f64 b (*.f64 b b)) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 a #s(literal 0 binary64))))) (*.f64 b (*.f64 x-scale y-scale))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))))))) (*.f64 (*.f64 (*.f64 a a) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))))))) |
(* (pow b 3) (+ (* 1/4 (* (/ (* (pow a 2) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a))))) (* b (* x-scale y-scale))) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (+ (* 1/2 (* (/ (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))))))))) (pow b 2)) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (* (* (pow a 2) (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) |
(*.f64 (*.f64 b (*.f64 b b)) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 a #s(literal 0 binary64))))) (*.f64 b (*.f64 x-scale y-scale))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 a #s(literal 0 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 a #s(literal 0 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))))))))))))) (*.f64 b b)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))))) (*.f64 (*.f64 (*.f64 a a) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))))))) |
(* (pow b 3) (+ (* 1/4 (* (/ (* (pow a 2) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a))))) (* b (* x-scale y-scale))) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (+ (* 1/2 (* (/ (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 a) (* 2 a)) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (* 1/4 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 a) (* 2 a)) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))))) (pow b 3)) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (+ (* 1/2 (* (/ (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))))))))) (pow b 2)) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (* (* (pow a 2) (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))))) |
(*.f64 (*.f64 b (*.f64 b b)) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 a #s(literal 0 binary64))))) (*.f64 b (*.f64 x-scale y-scale))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a #s(literal 0 binary64)) (+.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 a #s(literal 0 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a #s(literal 0 binary64)) (+.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 a #s(literal 0 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 a #s(literal 0 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))))))))))) (*.f64 b (*.f64 b b))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 a #s(literal 0 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 a #s(literal 0 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))))))))))))) (*.f64 b b)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))))) (*.f64 (*.f64 (*.f64 a a) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))))))))) |
(* -1 (* (* (pow a 2) (* (pow b 3) (* x-scale (* y-scale (sqrt 8))))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))) |
(neg.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b (*.f64 b b)) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))))) |
(* -1 (* (pow b 3) (+ (* -1/4 (* (/ (* (pow a 2) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a))))) (* b (* x-scale y-scale))) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (* (* (pow a 2) (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) |
(neg.f64 (*.f64 (*.f64 b (*.f64 b b)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 a #s(literal 0 binary64))))) (*.f64 b (*.f64 x-scale y-scale))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))))))) (*.f64 (*.f64 (*.f64 a a) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))))))) |
(* -1 (* (pow b 3) (+ (* -1 (/ (+ (* -1/2 (* (/ (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))))))))) b) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (* 1/4 (* (/ (* (pow a 2) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a))))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))))) b)) (* (* (pow a 2) (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) |
(neg.f64 (*.f64 (*.f64 b (*.f64 b b)) (+.f64 (neg.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 a #s(literal 0 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 a #s(literal 0 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))))))))))))) b) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 a #s(literal 0 binary64))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))))))))) b)) (*.f64 (*.f64 (*.f64 a a) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))))))) |
(* -1 (* (pow b 3) (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (* (/ (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 a) (* 2 a)) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (* 1/4 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 a) (* 2 a)) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))))) b) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (* 1/2 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))))))))) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) b)) (* 1/4 (* (/ (* (pow a 2) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a))))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))))) b)) (* (* (pow a 2) (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) |
(neg.f64 (*.f64 (*.f64 b (*.f64 b b)) (+.f64 (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a #s(literal 0 binary64)) (+.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 a #s(literal 0 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a #s(literal 0 binary64)) (+.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 a #s(literal 0 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 a #s(literal 0 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))))))))))) b) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 a a) (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 a #s(literal 0 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 a #s(literal 0 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))))))) b)) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 a #s(literal 0 binary64))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))))))))) b)) (*.f64 (*.f64 (*.f64 a a) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))))))) |
(* (* (pow a 2) (* (pow b 2) (* x-scale (* y-scale (sqrt 8))))) (sqrt (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) |
(*.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))) |
(* (pow a 2) (+ (* 1/4 (* (/ (* a (* (pow b 2) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* (* (pow b 2) (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) |
(*.f64 (*.f64 a a) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 a (*.f64 (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64)))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))))) |
(* (pow a 2) (+ (* a (+ (* 1/4 (* (/ (* (pow b 2) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* 1/2 (* (* a (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (+ (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))))) (sqrt (/ 1 (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (* (* (pow b 2) (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) |
(*.f64 (*.f64 a a) (fma.f64 a (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64)) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64)) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))))) (*.f64 (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))))) |
(* (pow a 2) (+ (* a (+ (* 1/4 (* (/ (* (pow b 2) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* a (+ (* 1/2 (* (* a (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 (pow b 3)) (* 2 (pow b 3))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (* 1/4 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 (pow b 3)) (* 2 (pow b 3))) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (+ (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))) (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))))))) (sqrt (/ 1 (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (* 1/2 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (+ (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (sqrt (/ 1 (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))))) (* (* (pow b 2) (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) |
(*.f64 (*.f64 a a) (fma.f64 a (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 a (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 a (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b #s(literal 0 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64)) (+.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64)) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64)) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64)) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64)) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64)) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))))))) (*.f64 (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))))) |
(* (* (pow a 3) (* (pow b 2) (* x-scale (* y-scale (sqrt 8))))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) |
(*.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))))))) |
(* (pow a 3) (+ (* 1/4 (* (/ (* (pow b 2) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b))))) (* a (* x-scale y-scale))) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (* (* (pow b 2) (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))) |
(*.f64 (*.f64 a (*.f64 a a)) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 b #s(literal 0 binary64))))) (*.f64 a (*.f64 x-scale y-scale))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))))))))) (*.f64 (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))))))))) |
(* (pow a 3) (+ (* 1/4 (* (/ (* (pow b 2) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b))))) (* a (* x-scale y-scale))) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (+ (* 1/2 (* (/ (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))))))))) (pow a 2)) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))) (* (* (pow b 2) (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) |
(*.f64 (*.f64 a (*.f64 a a)) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 b #s(literal 0 binary64))))) (*.f64 a (*.f64 x-scale y-scale))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 b #s(literal 0 binary64)) (*.f64 b #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 b #s(literal 0 binary64)) (*.f64 b #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))))))))))))))) (*.f64 a a)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)))))))) (*.f64 (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)))))))))) |
(* (pow a 3) (+ (* 1/4 (* (/ (* (pow b 2) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b))))) (* a (* x-scale y-scale))) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (+ (* 1/2 (* (/ (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 b) (* 2 b)) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (* 1/4 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 b) (* 2 b)) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))))) (pow a 3)) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))) (+ (* 1/2 (* (/ (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))))))))) (pow a 2)) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))) (* (* (pow b 2) (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))))) |
(*.f64 (*.f64 a (*.f64 a a)) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 b #s(literal 0 binary64))))) (*.f64 a (*.f64 x-scale y-scale))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b #s(literal 0 binary64)) (+.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 b #s(literal 0 binary64)) (*.f64 b #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b #s(literal 0 binary64)) (+.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 b #s(literal 0 binary64)) (*.f64 b #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 b #s(literal 0 binary64)) (*.f64 b #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))))))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))))))))))) (*.f64 a (*.f64 a a))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 b #s(literal 0 binary64)) (*.f64 b #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 b #s(literal 0 binary64)) (*.f64 b #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))))))))))))))) (*.f64 a a)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)))))))) (*.f64 (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))))))))))) |
(* -1 (* (* (pow a 3) (* (pow b 2) (* x-scale (* y-scale (sqrt 8))))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) |
(neg.f64 (*.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)))))))) |
(* -1 (* (pow a 3) (+ (* -1/4 (* (/ (* (pow b 2) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b))))) (* a (* x-scale y-scale))) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (* (* (pow b 2) (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) |
(neg.f64 (*.f64 (*.f64 a (*.f64 a a)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 b #s(literal 0 binary64))))) (*.f64 a (*.f64 x-scale y-scale))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))))))))) (*.f64 (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)))))))))) |
(* -1 (* (pow a 3) (+ (* -1 (/ (+ (* -1/2 (* (/ (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))))))))) a) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))) (* 1/4 (* (/ (* (pow b 2) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b))))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))))) a)) (* (* (pow b 2) (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) |
(neg.f64 (*.f64 (*.f64 a (*.f64 a a)) (+.f64 (neg.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 b #s(literal 0 binary64)) (*.f64 b #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 b #s(literal 0 binary64)) (*.f64 b #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))))))))))))))) a) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 b #s(literal 0 binary64))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))))))))))) a)) (*.f64 (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)))))))))) |
(* -1 (* (pow a 3) (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (* (/ (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 b) (* 2 b)) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (* 1/4 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 b) (* 2 b)) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))))) a) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))) (* 1/2 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))))))))) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) a)) (* 1/4 (* (/ (* (pow b 2) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b))))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))))) a)) (* (* (pow b 2) (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) |
(neg.f64 (*.f64 (*.f64 a (*.f64 a a)) (+.f64 (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b #s(literal 0 binary64)) (+.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 b #s(literal 0 binary64)) (*.f64 b #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b #s(literal 0 binary64)) (+.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 b #s(literal 0 binary64)) (*.f64 b #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 b #s(literal 0 binary64)) (*.f64 b #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))))))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))))))))))) a) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 b #s(literal 0 binary64)) (*.f64 b #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 b #s(literal 0 binary64)) (*.f64 b #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))))))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)))))))))) a)) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 b #s(literal 0 binary64))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))))))))))) a)) (*.f64 (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)))))))))) |
(* (* (pow a 2) (* (pow b 2) (* y-scale (sqrt 8)))) (sqrt (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) |
(*.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))) |
(+ (* 1/2 (* (* (pow a 2) (* (pow b 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (* (* (pow a 2) (* (pow b 2) (* y-scale (sqrt 8)))) (sqrt (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))) |
(fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))))) (*.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))))) |
(+ (* (* (pow a 2) (* (pow b 2) (* y-scale (sqrt 8)))) (sqrt (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* (pow x-scale 2) (+ (* 1/2 (* (* (pow a 2) (* (pow b 2) (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (* 1/2 (* (* (pow a 2) (* (pow b 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))))) |
(fma.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))) (*.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))))))))) |
(+ (* (* (pow a 2) (* (pow b 2) (* y-scale (sqrt 8)))) (sqrt (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* (pow x-scale 2) (+ (* 1/2 (* (* (pow a 2) (* (pow b 2) (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (* (pow x-scale 2) (+ (* 1/2 (* (* (pow a 2) (* (pow b 2) (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (* 1/2 (* (* (pow a 2) (* (pow b 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))))))) |
(fma.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))) (*.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) #s(literal 2 binary64)))))) (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))))) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))))))))))) |
(* (* (pow a 2) (* (pow b 2) (* x-scale (* y-scale (sqrt 8))))) (sqrt (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) |
(*.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))) |
(* x-scale (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (* (* (pow a 2) (* (pow b 2) (* y-scale (sqrt 8)))) (sqrt (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) |
(*.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))))) |
(* x-scale (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (* (* (pow a 2) (* (pow b 2) (* y-scale (sqrt 8)))) (sqrt (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))) |
(*.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))))))) (pow.f64 x-scale #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))))) |
(* x-scale (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))))) (pow x-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (* (* (pow a 2) (* (pow b 2) (* y-scale (sqrt 8)))) (sqrt (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) |
(*.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))))) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))))))) (pow.f64 x-scale #s(literal 6 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))))))) (pow.f64 x-scale #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))))))) |
(* -1 (* (* (pow a 2) (* (pow b 2) (* x-scale (* y-scale (sqrt 8))))) (sqrt (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))) |
(neg.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))) |
(* -1 (* x-scale (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (* (* (pow a 2) (* (pow b 2) (* y-scale (sqrt 8)))) (sqrt (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))) |
(neg.f64 (*.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))))) |
(* -1 (* x-scale (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (* (* (pow a 2) (* (pow b 2) (* y-scale (sqrt 8)))) (sqrt (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) |
(neg.f64 (*.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))))))) (pow.f64 x-scale #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))))))) |
(* -1 (* x-scale (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))))) (pow x-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (* (* (pow a 2) (* (pow b 2) (* y-scale (sqrt 8)))) (sqrt (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))))) |
(neg.f64 (*.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))))) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))))))) (pow.f64 x-scale #s(literal 6 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))))))) (pow.f64 x-scale #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))))))) |
(* (* (pow a 2) (* (pow b 2) (* x-scale (sqrt 8)))) (sqrt (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) |
(*.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))) |
(+ (* 1/2 (* (* (pow a 2) (* (pow b 2) (* x-scale (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (* (* (pow a 2) (* (pow b 2) (* x-scale (sqrt 8)))) (sqrt (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))) |
(fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))))) (*.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))))) |
(+ (* (* (pow a 2) (* (pow b 2) (* x-scale (sqrt 8)))) (sqrt (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* (pow y-scale 2) (+ (* 1/2 (* (* (pow a 2) (* (pow b 2) (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (* 1/2 (* (* (pow a 2) (* (pow b 2) (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))))) |
(fma.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 (*.f64 y-scale y-scale) (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))) (*.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))))))))) |
(+ (* (* (pow a 2) (* (pow b 2) (* x-scale (sqrt 8)))) (sqrt (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* (pow y-scale 2) (+ (* 1/2 (* (* (pow a 2) (* (pow b 2) (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (* (pow y-scale 2) (+ (* 1/2 (* (* (pow a 2) (* (pow b 2) (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (* 1/2 (* (* (pow a 2) (* (pow b 2) (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))))))) |
(fma.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))))) (*.f64 (*.f64 y-scale y-scale) (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))) (*.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) #s(literal 2 binary64)))))) (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))))) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))))))))))) |
(* (* (pow a 2) (* (pow b 2) (* x-scale (* y-scale (sqrt 8))))) (sqrt (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) |
(*.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))))) |
(* y-scale (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (* (* (pow a 2) (* (pow b 2) (* x-scale (sqrt 8)))) (sqrt (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) |
(*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))))) (*.f64 y-scale y-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))))))) |
(* y-scale (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (* (* (pow a 2) (* (pow b 2) (* x-scale (sqrt 8)))) (sqrt (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))) |
(*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))))) (*.f64 y-scale y-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))))))) (pow.f64 y-scale #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))))) |
(* y-scale (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* x-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))))) (pow y-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (* (* (pow a 2) (* (pow b 2) (* x-scale (sqrt 8)))) (sqrt (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) |
(*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))))) (*.f64 y-scale y-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)))))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))))))) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))))))) (pow.f64 y-scale #s(literal 6 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))))))) (pow.f64 y-scale #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))))))))) |
(* -1 (* (* (pow a 2) (* (pow b 2) (* x-scale (* y-scale (sqrt 8))))) (sqrt (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) |
(neg.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))) |
(* -1 (* y-scale (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (* (* (pow a 2) (* (pow b 2) (* x-scale (sqrt 8)))) (sqrt (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))) |
(neg.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))))) (*.f64 y-scale y-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))))) |
(* -1 (* y-scale (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (* (* (pow a 2) (* (pow b 2) (* x-scale (sqrt 8)))) (sqrt (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) |
(neg.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))))) (*.f64 y-scale y-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))))))) (pow.f64 y-scale #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))))))))) |
(* -1 (* y-scale (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* x-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))))) (pow y-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (* (* (pow a 2) (* (pow b 2) (* x-scale (sqrt 8)))) (sqrt (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))))) |
(neg.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))))) (*.f64 y-scale y-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)))))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))))))) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))))))) (pow.f64 y-scale #s(literal 6 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))))))) (pow.f64 y-scale #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))))))) |
(* (pow a 2) (* (pow b 3) (* y-scale (* (sqrt 2) (sqrt 8))))) |
(*.f64 (*.f64 a a) (*.f64 (*.f64 b (*.f64 b b)) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(+ (* 1/2 (/ (* (pow a 2) (* (pow angle 2) (* b (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))))))))) (sqrt 2))) (* (pow a 2) (* (pow b 3) (* y-scale (* (sqrt 2) (sqrt 8)))))) |
(fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 angle angle) (*.f64 b (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))))))))))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a a) (*.f64 (*.f64 b (*.f64 b b)) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))) |
(+ (* (pow a 2) (* (pow b 3) (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow a 2) (* b (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))))))) (sqrt 2))) (* 1/2 (/ (* (pow a 2) (* (pow angle 2) (* b (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/2 (/ (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))))))) (sqrt 2)))))) |
(fma.f64 (*.f64 a a) (*.f64 (*.f64 b (*.f64 b b)) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 angle angle) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 b (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))))))))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 angle angle) (*.f64 b (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fma.f64 #s(literal -1/196830000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (pow.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))))))))))) (sqrt.f64 #s(literal 2 binary64))))))) |
(+ (* (pow a 2) (* (pow b 3) (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow a 2) (* b (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))))))) (sqrt 2))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow a 2) (* b (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/2 (/ (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2)))))))))) (sqrt 2))) (* 1/2 (/ (* (pow a 2) (* (pow angle 2) (* b (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow y-scale 2))) (+ (* -1/765275040000000 (/ (* (pow b 2) (pow (PI) 6)) (pow x-scale 2))) (+ (* 1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow x-scale 2))) (+ (* 1/765275040000000 (/ (* (pow b 2) (pow (PI) 6)) (pow y-scale 2))) (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))))) (+ (* 2 (* (- (+ (* -1/765275040000000 (/ (* (pow b 2) (pow (PI) 6)) (pow x-scale 2))) (* 1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow x-scale 2)))) (+ (* -1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow y-scale 2))) (* 1/765275040000000 (/ (* (pow b 2) (pow (PI) 6)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow (+ a b) 2) (* (+ (* 1/31886460000000 (pow (PI) 6)) (* 1/19131876000000 (pow (PI) 6))) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (* 1/2 (/ (* (pow x-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/2 (/ (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))) (* (pow b 2) (pow (sqrt 2) 2))))))))))) (sqrt 2)))))))) |
(fma.f64 (*.f64 a a) (*.f64 (*.f64 b (*.f64 b b)) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 b (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))))))))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 angle angle) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 b (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fma.f64 #s(literal -1/196830000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (pow.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))))))))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 angle angle) (*.f64 b (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (fma.f64 #s(literal -1/765275040000000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/765275040000000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/765275040000000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/765275040000000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)))))) (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/765275040000000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/765275040000000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/765275040000000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/765275040000000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/11957422500000 binary64)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (+.f64 (fma.f64 #s(literal -1/196830000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (pow.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fma.f64 #s(literal -1/196830000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (pow.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))))))) (*.f64 (*.f64 b b) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))))))))) (sqrt.f64 #s(literal 2 binary64))))))))) |
(* (* (pow a 2) (* (pow b 2) (* x-scale (* y-scale (sqrt 8))))) (sqrt (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) |
(*.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))))) |
(* (* (pow a 2) (* (pow b 2) (* x-scale (* y-scale (sqrt 8))))) (sqrt (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) |
(*.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))))) |
(* (* (pow a 2) (* (pow b 2) (* x-scale (* y-scale (sqrt 8))))) (sqrt (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) |
(*.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))))) |
(* (* (pow a 2) (* (pow b 2) (* x-scale (* y-scale (sqrt 8))))) (sqrt (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) |
(*.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))))) |
(* (* (pow a 2) (* (pow b 2) (* x-scale (* y-scale (sqrt 8))))) (sqrt (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) |
(*.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))))) |
(* (* (pow a 2) (* (pow b 2) (* x-scale (* y-scale (sqrt 8))))) (sqrt (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) |
(*.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))))) |
(* (* (pow a 2) (* (pow b 2) (* x-scale (* y-scale (sqrt 8))))) (sqrt (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) |
(*.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))))) |
(* (* (pow a 2) (* (pow b 2) (* x-scale (* y-scale (sqrt 8))))) (sqrt (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) |
(*.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))))) |
(* 1/90 (* angle (PI))) |
(*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))) |
(* 1/90 (* angle (PI))) |
(*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))) |
(* 1/90 (* angle (PI))) |
(*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))) |
(* 1/90 (* angle (PI))) |
(*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))) |
(* 1/90 (* angle (PI))) |
(*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))) |
(* 1/90 (* angle (PI))) |
(*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))) |
(* 1/90 (* angle (PI))) |
(*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))) |
(* 1/90 (* angle (PI))) |
(*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))) |
(* 1/90 (* angle (PI))) |
(*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))) |
(* 1/90 (* angle (PI))) |
(*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))) |
(* 1/90 (* angle (PI))) |
(*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))) |
(* 1/90 (* angle (PI))) |
(*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))) |
(/ 1/4 (* (pow a 2) (pow b 2))) |
(/.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a a) (*.f64 b b))) |
(/ 1/4 (* (pow a 2) (pow b 2))) |
(/.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a a) (*.f64 b b))) |
(/ 1/4 (* (pow a 2) (pow b 2))) |
(/.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a a) (*.f64 b b))) |
(/ 1/4 (* (pow a 2) (pow b 2))) |
(/.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a a) (*.f64 b b))) |
(/ 1/4 (* (pow a 2) (pow b 2))) |
(/.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a a) (*.f64 b b))) |
(/ 1/4 (* (pow a 2) (pow b 2))) |
(/.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a a) (*.f64 b b))) |
(/ 1/4 (* (pow a 2) (pow b 2))) |
(/.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a a) (*.f64 b b))) |
(/ 1/4 (* (pow a 2) (pow b 2))) |
(/.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a a) (*.f64 b b))) |
(/ 1/4 (* (pow a 2) (pow b 2))) |
(/.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a a) (*.f64 b b))) |
(/ 1/4 (* (pow a 2) (pow b 2))) |
(/.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a a) (*.f64 b b))) |
(/ 1/4 (* (pow a 2) (pow b 2))) |
(/.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a a) (*.f64 b b))) |
(/ 1/4 (* (pow a 2) (pow b 2))) |
(/.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a a) (*.f64 b b))) |
(/ 1/4 (* (pow a 2) (pow b 2))) |
(/.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a a) (*.f64 b b))) |
(/ 1/4 (* (pow a 2) (pow b 2))) |
(/.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a a) (*.f64 b b))) |
(/ 1/4 (* (pow a 2) (pow b 2))) |
(/.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a a) (*.f64 b b))) |
(/ 1/4 (* (pow a 2) (pow b 2))) |
(/.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a a) (*.f64 b b))) |
(/ 1/4 (* (pow a 2) (pow b 2))) |
(/.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a a) (*.f64 b b))) |
(/ 1/4 (* (pow a 2) (pow b 2))) |
(/.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a a) (*.f64 b b))) |
(/ 1/4 (* (pow a 2) (pow b 2))) |
(/.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a a) (*.f64 b b))) |
(/ 1/4 (* (pow a 2) (pow b 2))) |
(/.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a a) (*.f64 b b))) |
(/ 1/4 (* (pow a 2) (pow b 2))) |
(/.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a a) (*.f64 b b))) |
(/ 1/4 (* (pow a 2) (pow b 2))) |
(/.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a a) (*.f64 b b))) |
(/ 1/4 (* (pow a 2) (pow b 2))) |
(/.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a a) (*.f64 b b))) |
(/ 1/4 (* (pow a 2) (pow b 2))) |
(/.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a a) (*.f64 b b))) |
(* -4 (* (pow a 2) (pow b 2))) |
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 a a) (*.f64 b b))) |
(* -4 (* (pow a 2) (pow b 2))) |
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 a a) (*.f64 b b))) |
(* -4 (* (pow a 2) (pow b 2))) |
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 a a) (*.f64 b b))) |
(* -4 (* (pow a 2) (pow b 2))) |
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 a a) (*.f64 b b))) |
(* -4 (* (pow a 2) (pow b 2))) |
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 a a) (*.f64 b b))) |
(* -4 (* (pow a 2) (pow b 2))) |
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 a a) (*.f64 b b))) |
(* -4 (* (pow a 2) (pow b 2))) |
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 a a) (*.f64 b b))) |
(* -4 (* (pow a 2) (pow b 2))) |
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 a a) (*.f64 b b))) |
(* -4 (* (pow a 2) (pow b 2))) |
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 a a) (*.f64 b b))) |
(* -4 (* (pow a 2) (pow b 2))) |
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 a a) (*.f64 b b))) |
(* -4 (* (pow a 2) (pow b 2))) |
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 a a) (*.f64 b b))) |
(* -4 (* (pow a 2) (pow b 2))) |
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 a a) (*.f64 b b))) |
(* -4 (* (pow a 2) (pow b 2))) |
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 a a) (*.f64 b b))) |
(* -4 (* (pow a 2) (pow b 2))) |
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 a a) (*.f64 b b))) |
(* -4 (* (pow a 2) (pow b 2))) |
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 a a) (*.f64 b b))) |
(* -4 (* (pow a 2) (pow b 2))) |
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 a a) (*.f64 b b))) |
(* -4 (* (pow a 2) (pow b 2))) |
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 a a) (*.f64 b b))) |
(* -4 (* (pow a 2) (pow b 2))) |
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 a a) (*.f64 b b))) |
(* -4 (* (pow a 2) (pow b 2))) |
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 a a) (*.f64 b b))) |
(* -4 (* (pow a 2) (pow b 2))) |
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 a a) (*.f64 b b))) |
(* -4 (* (pow a 2) (pow b 2))) |
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 a a) (*.f64 b b))) |
(* -4 (* (pow a 2) (pow b 2))) |
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 a a) (*.f64 b b))) |
(* -4 (* (pow a 2) (pow b 2))) |
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 a a) (*.f64 b b))) |
(* -4 (* (pow a 2) (pow b 2))) |
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 a a) (*.f64 b b))) |
(* 1/2 (/ (pow y-scale 2) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) |
(*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) |
(+ (* -1/2 (/ (* (pow b 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (* 1/2 (/ (pow y-scale 2) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) |
(fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) |
(+ (* 1/2 (/ (pow y-scale 2) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (- (* 1/2 (/ (* (pow b 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 6) (pow (cos (* 1/180 (* angle (PI)))) 6)))) (* 1/2 (/ (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) |
(fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 b b) (*.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) |
(+ (* 1/2 (/ (pow y-scale 2) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (- (* (pow b 2) (- (* -1/2 (/ (* (pow b 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* (pow a 8) (pow (cos (* 1/180 (* angle (PI)))) 8)))) (* -1/2 (/ (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow a 6) (pow (cos (* 1/180 (* angle (PI)))) 6)))))) (* 1/2 (/ (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) |
(fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 b b) (fma.f64 (*.f64 b b) (*.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64)))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) |
(* 1/2 (/ (pow y-scale 2) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) |
(*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) |
(/ (+ (* -1/2 (/ (* (pow a 2) (* (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 1/2 (/ (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow b 2)) |
(/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 b b)) |
(/ (- (+ (* 1/2 (/ (* (pow a 4) (* (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/2 (/ (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* 1/2 (/ (* (pow a 2) (* (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow b 2)) |
(/.f64 (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 b b)) |
(/ (- (+ (* -1/2 (/ (* (pow a 6) (* (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 6))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 8)))) (* 1/2 (/ (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (* -1/2 (/ (* (pow a 4) (* (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/2 (/ (* (pow a 2) (* (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (pow b 2)) |
(/.f64 (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 b b)) |
(* 1/2 (/ (pow y-scale 2) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) |
(*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) |
(/ (+ (* -1/2 (/ (* (pow a 2) (* (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 1/2 (/ (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow b 2)) |
(/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 b b)) |
(/ (- (+ (* 1/2 (/ (* (pow a 4) (* (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/2 (/ (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* 1/2 (/ (* (pow a 2) (* (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow b 2)) |
(/.f64 (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 b b)) |
(/ (- (+ (* -1/2 (/ (* (pow a 6) (* (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 6))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 8)))) (* 1/2 (/ (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (* -1/2 (/ (* (pow a 4) (* (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/2 (/ (* (pow a 2) (* (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (pow b 2)) |
(/.f64 (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 b b)) |
(* 1/2 (/ (pow y-scale 2) (pow a 2))) |
(*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a))) |
(+ (* -1/2 (/ (* (pow angle 2) (* (pow y-scale 4) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 4))) (* 1/2 (/ (pow y-scale 2) (pow a 2)))) |
(fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 angle angle) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))) (pow.f64 a #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a)))) |
(+ (* 1/2 (/ (pow y-scale 2) (pow a 2))) (* (pow angle 2) (- (* -1 (* (pow angle 2) (+ (* -1/2 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (* 1/2 (/ (* (pow y-scale 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (pow a 4)))))) (* 1/2 (/ (* (pow y-scale 4) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow a 4)))))) |
(fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a)) (*.f64 (*.f64 angle angle) (+.f64 (neg.f64 (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))) (pow.f64 a #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)))) (pow.f64 a #s(literal 4 binary64))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (pow.f64 a #s(literal 4 binary64))))))) |
(+ (* 1/2 (/ (pow y-scale 2) (pow a 2))) (* (pow angle 2) (- (* (pow angle 2) (- (* -1 (* (pow angle 2) (+ (* -1 (/ (* (pow y-scale 2) (* (+ (* -1/2 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (* 1/2 (/ (* (pow y-scale 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (pow a 4)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2))) (+ (* -1/2 (/ (* (pow y-scale 6) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))) (pow a 6))) (* 1/2 (/ (* (pow y-scale 4) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (pow a 4))))))) (+ (* -1/2 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (* 1/2 (/ (* (pow y-scale 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (pow a 4)))))) (* 1/2 (/ (* (pow y-scale 4) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow a 4)))))) |
(fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a)) (*.f64 (*.f64 angle angle) (fma.f64 (*.f64 angle angle) (-.f64 (neg.f64 (*.f64 (*.f64 angle angle) (+.f64 (neg.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))) (pow.f64 a #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)))) (pow.f64 a #s(literal 4 binary64))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))) (*.f64 a a))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))))) (pow.f64 a #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (*.f64 y-scale y-scale)))) (pow.f64 a #s(literal 4 binary64)))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))) (pow.f64 a #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)))) (pow.f64 a #s(literal 4 binary64)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (pow.f64 a #s(literal 4 binary64))))))) |
(/ 1/2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) |
(/.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) |
(/ 1/2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) |
(/.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) |
(/ 1/2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) |
(/.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) |
(/ 1/2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) |
(/.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) |
(/ 1/2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) |
(/.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) |
(/ 1/2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) |
(/.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) |
(/ 1/2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) |
(/.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) |
(/ 1/2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) |
(/.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) |
(* 1/2 (/ (pow y-scale 2) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) |
(*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale y-scale) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) |
(* 1/2 (/ (pow y-scale 2) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) |
(*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale y-scale) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) |
(* 1/2 (/ (pow y-scale 2) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) |
(*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale y-scale) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) |
(* 1/2 (/ (pow y-scale 2) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) |
(*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale y-scale) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) |
(* 1/2 (/ (pow y-scale 2) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) |
(*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale y-scale) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) |
(* 1/2 (/ (pow y-scale 2) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) |
(*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale y-scale) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) |
(* 1/2 (/ (pow y-scale 2) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) |
(*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale y-scale) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) |
(* 1/2 (/ (pow y-scale 2) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) |
(*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale y-scale) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) |
(* 1/2 (/ (pow y-scale 2) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) |
(*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale y-scale) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) |
(* 1/2 (/ (pow y-scale 2) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) |
(*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale y-scale) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) |
(* 1/2 (/ (pow y-scale 2) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) |
(*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale y-scale) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) |
(* 1/2 (/ (pow y-scale 2) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) |
(*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale y-scale) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) |
(* 1/2 (/ (pow y-scale 2) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) |
(*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) |
(+ (* -1/2 (/ (* (pow a 2) (* (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 1/2 (/ (pow y-scale 2) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) |
(fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) |
(+ (* 1/2 (/ (pow y-scale 2) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (- (* 1/2 (/ (* (pow a 2) (* (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/2 (/ (* (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) |
(fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 a a) (*.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) |
(+ (* 1/2 (/ (pow y-scale 2) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (- (* (pow a 2) (- (* -1/2 (/ (* (pow a 2) (* (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 6))) (* (pow b 8) (pow (sin (* 1/180 (* angle (PI)))) 8)))) (* -1/2 (/ (* (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (* 1/2 (/ (* (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) |
(fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 a a) (fma.f64 (*.f64 a a) (*.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64)))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) |
(* 1/2 (/ (pow y-scale 2) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) |
(*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) |
(/ (+ (* -1/2 (/ (* (pow b 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (* 1/2 (/ (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow a 2)) |
(/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 a a)) |
(/ (- (+ (* 1/2 (/ (* (pow b 4) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 6)))) (* 1/2 (/ (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* 1/2 (/ (* (pow b 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (pow a 2)) |
(/.f64 (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 a a)) |
(/ (- (+ (* -1/2 (/ (* (pow b 6) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* (pow a 6) (pow (cos (* 1/180 (* angle (PI)))) 8)))) (* 1/2 (/ (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (+ (* -1/2 (/ (* (pow b 4) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 6)))) (* 1/2 (/ (* (pow b 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (pow a 2)) |
(/.f64 (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 6 binary64)) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 a a)) |
(* 1/2 (/ (pow y-scale 2) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) |
(*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) |
(/ (+ (* -1/2 (/ (* (pow b 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (* 1/2 (/ (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow a 2)) |
(/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 a a)) |
(/ (- (+ (* 1/2 (/ (* (pow b 4) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 6)))) (* 1/2 (/ (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* 1/2 (/ (* (pow b 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (pow a 2)) |
(/.f64 (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 a a)) |
(/ (- (+ (* -1/2 (/ (* (pow b 6) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* (pow a 6) (pow (cos (* 1/180 (* angle (PI)))) 8)))) (* 1/2 (/ (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (+ (* -1/2 (/ (* (pow b 4) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 6)))) (* 1/2 (/ (* (pow b 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (pow a 2)) |
(/.f64 (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 6 binary64)) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 a a)) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) |
(+ (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) |
(fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 b b) (*.f64 #s(literal 1/8 binary64) (fma.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 b b) (*.f64 #s(literal 1/8 binary64) (fma.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))))))) |
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) |
(* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))) |
(*.f64 b (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 b b)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))))) |
(* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) |
(*.f64 b (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 b b)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))))))) (pow.f64 b #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))))))) |
(* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))))) |
(*.f64 b (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 b b)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))))))) (pow.f64 b #s(literal 6 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))))))) (pow.f64 b #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))))))) |
(* -1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) |
(*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) |
(* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) |
(neg.f64 (*.f64 b (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 b b)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))))))) |
(* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))))) |
(neg.f64 (*.f64 b (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 b b)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))))))) (pow.f64 b #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))))))) |
(* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))))) |
(neg.f64 (*.f64 b (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 b b)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))))))) (pow.f64 b #s(literal 6 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))))))) (pow.f64 b #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) |
(+ (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) |
(fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (*.f64 a a) (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 a a) (*.f64 #s(literal 1/8 binary64) (fma.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 (*.f64 a a) (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 a a) (*.f64 #s(literal 1/8 binary64) (fma.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 (*.f64 a a) (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))))))) |
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) |
(* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) |
(*.f64 a (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 a a)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))))) |
(* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) |
(*.f64 a (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 a a)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))))))) (pow.f64 a #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))))))) |
(* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))) |
(*.f64 a (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 a a)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))))))) (pow.f64 a #s(literal 6 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))))))) (pow.f64 a #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))))))) |
(* -1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) |
(*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 a (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) |
(* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) |
(neg.f64 (*.f64 a (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 a a)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))))))) |
(* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))) |
(neg.f64 (*.f64 a (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 a a)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))))))) (pow.f64 a #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))))))) |
(* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))))) |
(neg.f64 (*.f64 a (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 a a)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))))))) (pow.f64 a #s(literal 6 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))))))) (pow.f64 a #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))))))))) |
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) |
(+ (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) |
(fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) |
(+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 #s(literal 1/8 binary64) (fma.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))))))) |
(+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 #s(literal 1/8 binary64) (fma.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) |
(*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))) (pow.f64 x-scale #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) |
(*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))) (pow.f64 x-scale #s(literal 6 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))) (pow.f64 x-scale #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))))) |
(* -1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) |
(* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) |
(neg.f64 (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))))) |
(* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) |
(neg.f64 (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))) (pow.f64 x-scale #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))))) |
(* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))))) |
(neg.f64 (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))) (pow.f64 x-scale #s(literal 6 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))) (pow.f64 x-scale #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))))))) |
(* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) |
(+ (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) |
(fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) |
(+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 (*.f64 y-scale y-scale) (*.f64 #s(literal 1/8 binary64) (fma.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))))))) |
(+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 y-scale y-scale) (*.f64 #s(literal 1/8 binary64) (fma.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) |
(* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) |
(*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 y-scale y-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))) |
(* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) |
(*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 y-scale y-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))) (pow.f64 y-scale #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))))) |
(* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) |
(*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 y-scale y-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)))))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))) (pow.f64 y-scale #s(literal 6 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))) (pow.f64 y-scale #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))))) |
(* -1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) |
(* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) |
(neg.f64 (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 y-scale y-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))))) |
(* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) |
(neg.f64 (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 y-scale y-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))) (pow.f64 y-scale #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))))) |
(* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))))) |
(neg.f64 (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 y-scale y-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)))))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))) (pow.f64 y-scale #s(literal 6 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))) (pow.f64 y-scale #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))))))) |
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))))))) (* b (sqrt 2)))) (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))) |
(fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 angle angle) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))))))))) (*.f64 b (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))) |
(+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))))) (* b (sqrt 2))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 angle angle) (*.f64 #s(literal 1/8 binary64) (+.f64 (/.f64 (*.f64 (*.f64 angle angle) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal -1/787320000 binary64)) (pow.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))))))) (*.f64 b (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))))))) (*.f64 b (sqrt.f64 #s(literal 2 binary64)))))))) |
(+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))))) (* b (sqrt 2)))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))))) (* 1/2 (/ (* (pow x-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2)))))))) (* b (sqrt 2))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))))))) (*.f64 b (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 angle angle) (*.f64 #s(literal 1/8 binary64) (+.f64 (/.f64 (*.f64 (*.f64 angle angle) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)))))) (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (fma.f64 #s(literal 1/102036672000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (+.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal -1/787320000 binary64)) (pow.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (*.f64 y-scale y-scale)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))))) (+.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal -1/787320000 binary64)) (pow.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))))) (*.f64 (*.f64 b b) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))))))) (*.f64 b (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal -1/787320000 binary64)) (pow.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))))))) (*.f64 b (sqrt.f64 #s(literal 2 binary64)))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))) |
(* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) x-scale) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) x-scale) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) |
(/ (+ (* 1/8 (* (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* (pow x-scale 2) (* y-scale (* (sqrt 2) (sqrt 8)))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) x-scale) |
(/.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) x-scale) |
(/ (+ (* 1/8 (* (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* (pow x-scale 2) (* y-scale (* (sqrt 2) (sqrt 8)))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) x-scale) |
(/.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) x-scale) |
(/ (+ (* 1/8 (* (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* (pow x-scale 2) (* y-scale (* (sqrt 2) (sqrt 8)))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) x-scale) |
(/.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) x-scale) |
(* 1/4 (* (* x-scale (* y-scale (* (sqrt 2) (sqrt 8)))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) |
(*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) |
(*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) |
(*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) |
(* 1/4 (* (* x-scale (* y-scale (* (sqrt 2) (sqrt 8)))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) |
(* -1 (* x-scale (+ (* -1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* -1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) |
(neg.f64 (*.f64 x-scale (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))))) |
(* -1 (* x-scale (+ (* -1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* -1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) |
(neg.f64 (*.f64 x-scale (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))))) |
(* -1 (* x-scale (+ (* -1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* -1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) |
(neg.f64 (*.f64 x-scale (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))))) |
(* 1/4 (* (* x-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) |
(+ (* 1/8 (* (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) x-scale) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* 1/4 (* (* x-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) |
(fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) x-scale) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) |
(+ (* 1/8 (* (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) x-scale) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* 1/4 (* (* x-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) |
(fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) x-scale) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) |
(+ (* 1/8 (* (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) x-scale) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* 1/4 (* (* x-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) |
(fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) x-scale) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) |
(* 1/8 (* (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) x-scale) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) |
(*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) x-scale) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) |
(* (pow y-scale 2) (+ (* 1/8 (* (/ (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) x-scale) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* 1/4 (* (/ (* x-scale (* (sqrt 2) (sqrt 8))) (pow y-scale 2)) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) |
(*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) x-scale) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) |
(* (pow y-scale 2) (+ (* 1/8 (* (/ (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) x-scale) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* 1/4 (* (/ (* x-scale (* (sqrt 2) (sqrt 8))) (pow y-scale 2)) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) |
(*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) x-scale) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) |
(* (pow y-scale 2) (+ (* 1/8 (* (/ (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) x-scale) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* 1/4 (* (/ (* x-scale (* (sqrt 2) (sqrt 8))) (pow y-scale 2)) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) |
(*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) x-scale) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) |
(* -1/8 (* (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) x-scale) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) |
(*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) x-scale) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) |
(* (pow y-scale 2) (+ (* -1/4 (* (/ (* x-scale (* (sqrt 2) (sqrt 8))) (pow y-scale 2)) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* -1/8 (* (/ (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) x-scale) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) |
(*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) x-scale) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))))) |
(* (pow y-scale 2) (+ (* -1/4 (* (/ (* x-scale (* (sqrt 2) (sqrt 8))) (pow y-scale 2)) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* -1/8 (* (/ (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) x-scale) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) |
(*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) x-scale) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))))) |
(* (pow y-scale 2) (+ (* -1/4 (* (/ (* x-scale (* (sqrt 2) (sqrt 8))) (pow y-scale 2)) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* -1/8 (* (/ (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) x-scale) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) |
(*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) x-scale) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))))) |
(* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (* 1/4 (* a (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))) |
(*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 a (*.f64 (*.f64 x-scale x-scale) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 a (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))) |
(+ (* 1/4 (/ (* b (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))))))) (* (pow a 3) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (* 1/4 (* a (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))) |
(fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 b (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64))))))) (*.f64 (*.f64 a (*.f64 a a)) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 a (*.f64 (*.f64 x-scale x-scale) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 a (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))) |
(+ (* b (+ (* 1/4 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))))) (* (pow a 3) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (* b (* x-scale (+ (* 1/8 (+ (* -1/2 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow a 3) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 3))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))))) (* 1/8 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))) (* a (cos (* 1/180 (* angle (PI)))))))))))) (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (* 1/4 (* a (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))) |
(fma.f64 b (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64)))))) (*.f64 (*.f64 a (*.f64 a a)) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 b (*.f64 x-scale (*.f64 #s(literal 1/8 binary64) (+.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 a (*.f64 a a)) (*.f64 (*.f64 x-scale x-scale) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64))))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 a (*.f64 (*.f64 x-scale x-scale) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 a (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 a (*.f64 (*.f64 x-scale x-scale) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 a (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))) |
(+ (* b (+ (* 1/4 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))))) (* (pow a 3) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (* b (+ (* 1/8 (* b (* x-scale (+ (* -1 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))))) (* (pow a 5) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 3))))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (pow a 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))))))) (* x-scale (+ (* 1/8 (+ (* -1/2 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow a 3) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 3))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))))) (* 1/8 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))) (* a (cos (* 1/180 (* angle (PI))))))))))))) (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (* 1/4 (* a (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))) |
(fma.f64 b (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64)))))) (*.f64 (*.f64 a (*.f64 a a)) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 b (fma.f64 #s(literal 1/8 binary64) (*.f64 b (*.f64 x-scale (+.f64 (neg.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64)))))) (*.f64 (pow.f64 a #s(literal 5 binary64)) (*.f64 (*.f64 x-scale x-scale) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a #s(literal 0 binary64))) (*.f64 a a)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (*.f64 a (*.f64 (*.f64 x-scale x-scale) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (*.f64 x-scale (*.f64 #s(literal 1/8 binary64) (+.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 a (*.f64 a a)) (*.f64 (*.f64 x-scale x-scale) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64))))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 a (*.f64 (*.f64 x-scale x-scale) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 a (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 a (*.f64 (*.f64 x-scale x-scale) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 a (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))) |
(* b (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))) |
(*.f64 b (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))) |
(* b (+ (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))))) (* b (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))) |
(*.f64 b (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 a #s(literal 0 binary64)))))) (*.f64 b (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))) |
(* b (+ (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))))) (* b (* x-scale (sin (* 1/180 (* angle (PI)))))))) (+ (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (/ (* x-scale (+ (* 1/8 (+ (* -1/2 (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))) |
(*.f64 b (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 a #s(literal 0 binary64)))))) (*.f64 b (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (/.f64 (*.f64 x-scale (*.f64 #s(literal 1/8 binary64) (+.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64)))) (*.f64 y-scale y-scale))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 b b))))) |
(* b (+ (* 1/8 (/ (* x-scale (+ (* -1 (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 a) (* 2 a))))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* 4 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (+ (* -2 a) (* 2 a)))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))))) (pow b 3))) (+ (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))))) (* b (* x-scale (sin (* 1/180 (* angle (PI)))))))) (+ (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (/ (* x-scale (+ (* 1/8 (+ (* -1/2 (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2)))))) |
(*.f64 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (+.f64 (neg.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 a #s(literal 0 binary64))))))) (*.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 a #s(literal 0 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 b (*.f64 b b))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 a #s(literal 0 binary64)))))) (*.f64 b (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (/.f64 (*.f64 x-scale (*.f64 #s(literal 1/8 binary64) (+.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64)))) (*.f64 y-scale y-scale))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 b b)))))) |
(* -1 (* b (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))) |
(neg.f64 (*.f64 b (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))) |
(* -1 (* b (+ (* -1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))))) (* b (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))) |
(neg.f64 (*.f64 b (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 a #s(literal 0 binary64)))))) (*.f64 b (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))))) |
(* -1 (* b (+ (* -1 (/ (+ (* -1 (/ (* x-scale (+ (* 1/8 (+ (* -1/2 (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (sin (* 1/180 (* angle (PI)))))))) b)) (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))) b)) (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))) |
(neg.f64 (*.f64 b (+.f64 (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (*.f64 x-scale (*.f64 #s(literal 1/8 binary64) (+.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64)))) (*.f64 y-scale y-scale))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) b)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 a #s(literal 0 binary64)))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) b)) (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))))) |
(* -1 (* b (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (/ (* x-scale (+ (* -1 (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 a) (* 2 a))))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* 4 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (+ (* -2 a) (* 2 a)))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))))) b)) (* x-scale (+ (* 1/8 (+ (* -1/2 (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (sin (* 1/180 (* angle (PI))))))))) b)) (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))) b)) (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))) |
(neg.f64 (*.f64 b (+.f64 (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 x-scale (+.f64 (neg.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 a #s(literal 0 binary64))))))) (*.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 a #s(literal 0 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) b) (*.f64 x-scale (*.f64 #s(literal 1/8 binary64) (+.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64)))) (*.f64 y-scale y-scale))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) b)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 a #s(literal 0 binary64)))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) b)) (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))))) |
(* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (pow b 2)) (pow b 2))))) (* a (pow x-scale 2)))) (* 1/4 (* a (* (sqrt 2) (sqrt 8)))))) |
(*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 #s(literal 0 binary64) (*.f64 b b))))) (*.f64 a (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/4 binary64) (*.f64 a (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))) |
(+ (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (pow b 2)) (pow b 2))))) (* a (pow x-scale 2)))) (* 1/4 (* a (* (sqrt 2) (sqrt 8)))))) (* (pow angle 2) (* x-scale (+ (* 1/8 (+ (* -1/2 (/ (* (pow y-scale 4) (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1 (pow b 2)) (pow b 2)) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))))) (* (pow a 3) (pow x-scale 2)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))))))) (* a (pow x-scale 2))))) (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 2) (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))))) a)))))) |
(fma.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 #s(literal 0 binary64) (*.f64 b b))))) (*.f64 a (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/4 binary64) (*.f64 a (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 (*.f64 angle angle) (*.f64 x-scale (*.f64 #s(literal 1/8 binary64) (+.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (*.f64 #s(literal 0 binary64) (*.f64 b b)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))))) (*.f64 (*.f64 a (*.f64 a a)) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))))) (*.f64 a a)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))) (*.f64 a a)))))))))) (*.f64 a (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))))) a)))))) |
(+ (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (pow b 2)) (pow b 2))))) (* a (pow x-scale 2)))) (* 1/4 (* a (* (sqrt 2) (sqrt 8)))))) (* (pow angle 2) (+ (* x-scale (+ (* 1/8 (+ (* -1/2 (/ (* (pow y-scale 4) (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1 (pow b 2)) (pow b 2)) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))))) (* (pow a 3) (pow x-scale 2)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))))))) (* a (pow x-scale 2))))) (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 2) (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))))) a)))) (* (pow angle 2) (* x-scale (+ (* 1/8 (+ (* -1/2 (/ (* a (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (+ (* 1/4 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (/ (* (pow y-scale 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (pow a 4)))) (+ (* -1 (pow b 2)) (pow b 2)))))) (pow x-scale 2))) (+ (* -1/2 (/ (* (pow y-scale 4) (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2))))))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))))) (* (pow a 3) (pow x-scale 2)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (+ (* (pow b 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 2))))) (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))))) (pow a 2)) (+ (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))) (pow a 2))) (/ (* (pow y-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))) (pow a 2))))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))) (* a (pow x-scale 2)))))) (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 2) (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 2))))))) a)))))))) |
(fma.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 #s(literal 0 binary64) (*.f64 b b))))) (*.f64 a (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/4 binary64) (*.f64 a (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 (*.f64 angle angle) (fma.f64 x-scale (*.f64 #s(literal 1/8 binary64) (+.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (*.f64 #s(literal 0 binary64) (*.f64 b b)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))))) (*.f64 (*.f64 a (*.f64 a a)) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))))) (*.f64 a a)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))) (*.f64 a a)))))))))) (*.f64 a (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))))) a))) (*.f64 (*.f64 angle angle) (*.f64 x-scale (*.f64 #s(literal 1/8 binary64) (+.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 a (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (+.f64 (neg.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))) (pow.f64 a #s(literal 6 binary64)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))) (pow.f64 a #s(literal 6 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)))) (pow.f64 a #s(literal 4 binary64))))) (*.f64 #s(literal 0 binary64) (*.f64 b b)))))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))))) (*.f64 a a)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))) (*.f64 a a))))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))))) (*.f64 (*.f64 a (*.f64 a a)) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale)) #s(literal -1/787320000 binary64))))) (*.f64 a a)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))))) (*.f64 a a)) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))))) (*.f64 a a)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))) (*.f64 a a)))))) (*.f64 a a)))) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)))))))) (*.f64 a (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))) (*.f64 a a))))))) a)))))))) |
(+ (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (pow b 2)) (pow b 2))))) (* a (pow x-scale 2)))) (* 1/4 (* a (* (sqrt 2) (sqrt 8)))))) (* (pow angle 2) (+ (* x-scale (+ (* 1/8 (+ (* -1/2 (/ (* (pow y-scale 4) (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1 (pow b 2)) (pow b 2)) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))))) (* (pow a 3) (pow x-scale 2)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))))))) (* a (pow x-scale 2))))) (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 2) (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))))) a)))) (* (pow angle 2) (+ (* x-scale (+ (* 1/8 (+ (* -1/2 (/ (* a (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (+ (* 1/4 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (/ (* (pow y-scale 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (pow a 4)))) (+ (* -1 (pow b 2)) (pow b 2)))))) (pow x-scale 2))) (+ (* -1/2 (/ (* (pow y-scale 4) (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2))))))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))))) (* (pow a 3) (pow x-scale 2)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (+ (* (pow b 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 2))))) (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))))) (pow a 2)) (+ (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))) (pow a 2))) (/ (* (pow y-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))) (pow a 2))))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))) (* a (pow x-scale 2)))))) (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 2) (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 2))))))) a)))) (* (pow angle 2) (* x-scale (+ (* 1/8 (+ (* -1/2 (/ (* a (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1 (/ (* (pow y-scale 2) (* (+ (* -1 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (/ (* (pow y-scale 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (pow a 4))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2))) (+ (* -1 (/ (* (pow y-scale 6) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))) (pow a 6))) (+ (* 1/2 (/ (* (pow y-scale 2) (* (+ (* -1 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (+ (* 1/4 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (/ (* (pow y-scale 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (pow a 4)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2))) (/ (* (pow y-scale 4) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (pow a 4))))) (+ (* -1 (pow b 2)) (pow b 2)))))) (pow x-scale 2))) (+ (* -1/2 (/ (* a (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (+ (* 1/4 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (/ (* (pow y-scale 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (pow a 4)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2))))))))))) (pow x-scale 2))) (+ (* -1/2 (/ (* (pow y-scale 4) (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (+ (* (pow b 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 2))))) (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))))) (pow a 2)) (+ (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))) (pow a 2))) (/ (* (pow y-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))) (pow a 2))))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))))))) (* (pow a 3) (pow x-scale 2)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (+ (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (+ (* (pow b 2) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))))) (pow y-scale 2)))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- b a) 2)))) (pow y-scale 2))) (/ (* (pow (+ a b) 2) (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- b a) 2))) (pow y-scale 2))))))) (pow a 2)) (+ (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))))) (pow a 2))) (+ (/ (* (pow y-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (+ (* (pow b 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 2))))) (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))))) (pow a 2)) (+ (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))) (pow a 2))) (/ (* (pow y-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))) (pow a 2)))))) (pow a 2)) (/ (* (pow y-scale 2) (* (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))) (pow a 2)))))) (+ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6))))))))) (* a (pow x-scale 2))))))) (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 2) (* (sqrt 8) (- (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 2)))))) (pow a 2))))))) a)))))))))) |
(fma.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 #s(literal 0 binary64) (*.f64 b b))))) (*.f64 a (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/4 binary64) (*.f64 a (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 (*.f64 angle angle) (fma.f64 x-scale (*.f64 #s(literal 1/8 binary64) (+.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (*.f64 #s(literal 0 binary64) (*.f64 b b)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))))) (*.f64 (*.f64 a (*.f64 a a)) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))))) (*.f64 a a)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))) (*.f64 a a)))))))))) (*.f64 a (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))))) a))) (*.f64 (*.f64 angle angle) (fma.f64 x-scale (*.f64 #s(literal 1/8 binary64) (+.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 a (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (+.f64 (neg.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))) (pow.f64 a #s(literal 6 binary64)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))) (pow.f64 a #s(literal 6 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)))) (pow.f64 a #s(literal 4 binary64))))) (*.f64 #s(literal 0 binary64) (*.f64 b b)))))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))))) (*.f64 a a)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))) (*.f64 a a))))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))))) (*.f64 (*.f64 a (*.f64 a a)) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale)) #s(literal -1/787320000 binary64))))) (*.f64 a a)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))))) (*.f64 a a)) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))))) (*.f64 a a)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))) (*.f64 a a)))))) (*.f64 a a)))) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)))))))) (*.f64 a (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))) (*.f64 a a))))))) a))) (*.f64 (*.f64 angle angle) (*.f64 x-scale (*.f64 #s(literal 1/8 binary64) (+.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 a (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (+.f64 (+.f64 (neg.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (+.f64 (neg.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))) (pow.f64 a #s(literal 6 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)))) (pow.f64 a #s(literal 4 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))) (*.f64 a a))) (neg.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))))) (pow.f64 a #s(literal 6 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (+.f64 (neg.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))) (pow.f64 a #s(literal 6 binary64)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))) (pow.f64 a #s(literal 6 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)))) (pow.f64 a #s(literal 4 binary64))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))) (*.f64 a a)) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (*.f64 y-scale y-scale)))) (pow.f64 a #s(literal 4 binary64))))) (*.f64 #s(literal 0 binary64) (*.f64 b b)))))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 a (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (+.f64 (neg.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))) (pow.f64 a #s(literal 6 binary64)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))) (pow.f64 a #s(literal 6 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)))) (pow.f64 a #s(literal 4 binary64))))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))))) (*.f64 a a)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))) (*.f64 a a))))))))))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale)) #s(literal -1/787320000 binary64))))) (*.f64 a a)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))))) (*.f64 a a)) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))))) (*.f64 a a)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))) (*.f64 a a)))))) (*.f64 a a)))) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))))))))) (*.f64 (*.f64 a (*.f64 a a)) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))) (fma.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)))) (fma.f64 (*.f64 b b) (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 4 binary64) (fma.f64 #s(literal 1/102036672000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))))))) (*.f64 a a)) (+.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 y-scale y-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (*.f64 y-scale y-scale))))) (*.f64 a a)) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale)) #s(literal -1/787320000 binary64))))) (*.f64 a a)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))))) (*.f64 a a)) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))))) (*.f64 a a)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))) (*.f64 a a)))))) (*.f64 a a)))))) (*.f64 a a))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))))) (*.f64 a a)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))) (*.f64 a a)))))) (*.f64 a a)))) (fma.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64)))))))) (*.f64 a (*.f64 x-scale x-scale)))))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (+.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))) (*.f64 a a)))))) (*.f64 a a))))))) a)))))))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) |
(*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) |
(*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) |
(*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) |
(*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) |
(*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) |
(*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) |
(*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) |
(*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) |
(* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/4 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))) |
(*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 b (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))) |
(+ (* 1/4 (/ (* a (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))))))) (* (pow b 3) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/4 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))) |
(fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 a (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64))))))) (*.f64 (*.f64 b (*.f64 b b)) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 b (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))) |
(+ (* a (+ (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))))) (* (pow b 3) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* a (* x-scale (+ (* 1/8 (+ (* -1/2 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow b 3) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))))) (* 1/8 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))) (* b (sin (* 1/180 (* angle (PI)))))))))))) (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/4 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))) |
(fma.f64 a (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64)))))) (*.f64 (*.f64 b (*.f64 b b)) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 a (*.f64 x-scale (*.f64 #s(literal 1/8 binary64) (+.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 b (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64))))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 b (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 b (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 b (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))) |
(+ (* a (+ (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))))) (* (pow b 3) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* a (+ (* 1/8 (* a (* x-scale (+ (* -1 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))))) (* (pow b 5) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (pow b 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))))))) (* x-scale (+ (* 1/8 (+ (* -1/2 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow b 3) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))))) (* 1/8 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))) (* b (sin (* 1/180 (* angle (PI))))))))))))) (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/4 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))) |
(fma.f64 a (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64)))))) (*.f64 (*.f64 b (*.f64 b b)) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 a (fma.f64 #s(literal 1/8 binary64) (*.f64 a (*.f64 x-scale (+.f64 (neg.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64)))))) (*.f64 (pow.f64 b #s(literal 5 binary64)) (*.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b #s(literal 0 binary64))) (*.f64 b b)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (*.f64 b (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (*.f64 x-scale (*.f64 #s(literal 1/8 binary64) (+.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 b (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64))))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 b (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 b (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 b (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))) |
(* a (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))) |
(*.f64 a (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))) |
(* a (+ (* 1/4 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))))) (* a (* x-scale (cos (* 1/180 (* angle (PI)))))))) (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))) |
(*.f64 a (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 b #s(literal 0 binary64)))))) (*.f64 a (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))) |
(* a (+ (* 1/4 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))))) (* a (* x-scale (cos (* 1/180 (* angle (PI)))))))) (+ (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (/ (* x-scale (+ (* 1/8 (+ (* -1/2 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (* 1/8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (cos (* 1/180 (* angle (PI)))))))) (pow a 2))))) |
(*.f64 a (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 b #s(literal 0 binary64)))))) (*.f64 a (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (/.f64 (*.f64 x-scale (*.f64 #s(literal 1/8 binary64) (+.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 x-scale x-scale) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64)))) (*.f64 y-scale y-scale))))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 (*.f64 x-scale x-scale) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 a a))))) |
(* a (+ (* 1/8 (/ (* x-scale (+ (* -1 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 b) (* 2 b))))))) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* 4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (+ (* -2 b) (* 2 b)))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))))) (pow a 3))) (+ (* 1/4 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))))) (* a (* x-scale (cos (* 1/180 (* angle (PI)))))))) (+ (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (/ (* x-scale (+ (* 1/8 (+ (* -1/2 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (* 1/8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (cos (* 1/180 (* angle (PI)))))))) (pow a 2)))))) |
(*.f64 a (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (+.f64 (neg.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 b #s(literal 0 binary64))))))) (*.f64 (*.f64 x-scale x-scale) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 b #s(literal 0 binary64)))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 x-scale x-scale) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 a (*.f64 a a))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 b #s(literal 0 binary64)))))) (*.f64 a (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (/.f64 (*.f64 x-scale (*.f64 #s(literal 1/8 binary64) (+.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 x-scale x-scale) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64)))) (*.f64 y-scale y-scale))))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 (*.f64 x-scale x-scale) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 a a)))))) |
(* -1 (* a (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))) |
(neg.f64 (*.f64 a (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))) |
(* -1 (* a (+ (* -1/4 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))))) (* a (* x-scale (cos (* 1/180 (* angle (PI)))))))) (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))) |
(neg.f64 (*.f64 a (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 b #s(literal 0 binary64)))))) (*.f64 a (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))))) |
(* -1 (* a (+ (* -1 (/ (+ (* -1 (/ (* x-scale (+ (* 1/8 (+ (* -1/2 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (* 1/8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (cos (* 1/180 (* angle (PI)))))))) a)) (* 1/4 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))) a)) (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))) |
(neg.f64 (*.f64 a (+.f64 (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (*.f64 x-scale (*.f64 #s(literal 1/8 binary64) (+.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 x-scale x-scale) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64)))) (*.f64 y-scale y-scale))))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 (*.f64 x-scale x-scale) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) a)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 b #s(literal 0 binary64)))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) a)) (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))))) |
(* -1 (* a (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (/ (* x-scale (+ (* -1 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 b) (* 2 b))))))) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* 4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (+ (* -2 b) (* 2 b)))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))))) a)) (* x-scale (+ (* 1/8 (+ (* -1/2 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (* 1/8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (cos (* 1/180 (* angle (PI))))))))) a)) (* 1/4 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))) a)) (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))) |
(neg.f64 (*.f64 a (+.f64 (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 x-scale (+.f64 (neg.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 b #s(literal 0 binary64))))))) (*.f64 (*.f64 x-scale x-scale) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 b #s(literal 0 binary64)))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 x-scale x-scale) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) a) (*.f64 x-scale (*.f64 #s(literal 1/8 binary64) (+.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 x-scale x-scale) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64)))) (*.f64 y-scale y-scale))))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 (*.f64 x-scale x-scale) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) a)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 b #s(literal 0 binary64)))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) a)) (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))))) |
(* 1/4 (* (* (sqrt 2) (sqrt 8)) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) |
(+ (* 1/8 (* (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* 1/4 (* (* (sqrt 2) (sqrt 8)) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) |
(fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) |
(+ (* 1/8 (* (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* 1/4 (* (* (sqrt 2) (sqrt 8)) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) |
(fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) |
(+ (* 1/8 (* (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* 1/4 (* (* (sqrt 2) (sqrt 8)) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) |
(fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) |
(* 1/8 (* (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) |
(*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) |
(* (pow y-scale 2) (+ (* 1/8 (* (/ (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* 1/4 (* (/ (* (sqrt 2) (sqrt 8)) (pow y-scale 2)) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) |
(*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) |
(* (pow y-scale 2) (+ (* 1/8 (* (/ (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* 1/4 (* (/ (* (sqrt 2) (sqrt 8)) (pow y-scale 2)) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) |
(*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) |
(* (pow y-scale 2) (+ (* 1/8 (* (/ (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* 1/4 (* (/ (* (sqrt 2) (sqrt 8)) (pow y-scale 2)) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) |
(*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) |
(* -1/8 (* (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) |
(*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) |
(* (pow y-scale 2) (+ (* -1/4 (* (/ (* (sqrt 2) (sqrt 8)) (pow y-scale 2)) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* -1/8 (* (/ (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) |
(*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))))) |
(* (pow y-scale 2) (+ (* -1/4 (* (/ (* (sqrt 2) (sqrt 8)) (pow y-scale 2)) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* -1/8 (* (/ (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) |
(*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))))) |
(* (pow y-scale 2) (+ (* -1/4 (* (/ (* (sqrt 2) (sqrt 8)) (pow y-scale 2)) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* -1/8 (* (/ (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) |
(*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))))) |
(+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (* 1/4 (* a (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 a (*.f64 (*.f64 x-scale x-scale) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 a (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))) |
(+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (+ (* 1/4 (* a (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* b (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))))))) (* (pow a 3) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))))) |
(fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 a (*.f64 (*.f64 x-scale x-scale) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/4 binary64) (fma.f64 a (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (/.f64 (*.f64 b (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64))))))) (*.f64 (*.f64 a (*.f64 a a)) (*.f64 (*.f64 x-scale x-scale) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) |
(+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (+ (* 1/4 (* a (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* b (+ (* 1/4 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))))) (* (pow a 3) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (* b (+ (* 1/8 (+ (* -1/2 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow a 3) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 3))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))))) (* 1/8 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))) (* a (cos (* 1/180 (* angle (PI))))))))))))) |
(fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 a (*.f64 (*.f64 x-scale x-scale) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 a (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 b (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64)))))) (*.f64 (*.f64 a (*.f64 a a)) (*.f64 (*.f64 x-scale x-scale) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 b (*.f64 #s(literal 1/8 binary64) (+.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 a (*.f64 a a)) (*.f64 (*.f64 x-scale x-scale) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64))))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 a (*.f64 (*.f64 x-scale x-scale) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 a (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))))) |
(+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (+ (* 1/4 (* a (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* b (+ (* 1/4 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))))) (* (pow a 3) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (* b (+ (* 1/8 (* b (+ (* -1 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))))) (* (pow a 5) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 3))))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (pow a 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))))))) (+ (* 1/8 (+ (* -1/2 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow a 3) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 3))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))))) (* 1/8 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))) (* a (cos (* 1/180 (* angle (PI)))))))))))))) |
(fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 a (*.f64 (*.f64 x-scale x-scale) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 a (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 b (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64)))))) (*.f64 (*.f64 a (*.f64 a a)) (*.f64 (*.f64 x-scale x-scale) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 b (fma.f64 #s(literal 1/8 binary64) (*.f64 b (+.f64 (neg.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64)))))) (*.f64 (pow.f64 a #s(literal 5 binary64)) (*.f64 (*.f64 x-scale x-scale) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a #s(literal 0 binary64))) (*.f64 a a)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (*.f64 a (*.f64 (*.f64 x-scale x-scale) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 #s(literal 1/8 binary64) (+.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 a (*.f64 a a)) (*.f64 (*.f64 x-scale x-scale) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64))))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 a (*.f64 (*.f64 x-scale x-scale) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 a (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))))) |
(* b (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(*.f64 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))) |
(* b (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))))))) |
(*.f64 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (fma.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 a #s(literal 0 binary64)))))) (*.f64 b (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) |
(* b (+ (* 1/8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (* (pow b 2) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/8 (/ (+ (* -1/2 (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (pow b 2))) (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))))))))) |
(*.f64 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 b b) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64)))) (*.f64 y-scale y-scale))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 b b)) (*.f64 #s(literal 1/4 binary64) (fma.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 a #s(literal 0 binary64)))))) (*.f64 b (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))))) |
(* b (+ (* 1/8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (* (pow b 2) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/8 (/ (+ (* -1 (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 a) (* 2 a))))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* 4 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (+ (* -2 a) (* 2 a)))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (pow b 3))) (+ (* 1/8 (/ (+ (* -1/2 (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (pow b 2))) (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))))))))) |
(*.f64 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 b b) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (+.f64 (neg.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 a #s(literal 0 binary64))))))) (*.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 a #s(literal 0 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 b (*.f64 b b))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64)))) (*.f64 y-scale y-scale))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 b b)) (*.f64 #s(literal 1/4 binary64) (fma.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 a #s(literal 0 binary64)))))) (*.f64 b (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))))) |
(* -1 (* b (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))) |
(neg.f64 (*.f64 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))) |
(* -1 (* b (+ (* -1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))) |
(neg.f64 (*.f64 b (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 a #s(literal 0 binary64)))))) (*.f64 b (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))) |
(* -1 (* b (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/8 (+ (* -1/2 (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (sin (* 1/180 (* angle (PI))))))) b)) (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) b)) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))) |
(neg.f64 (*.f64 b (+.f64 (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (+.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64)))) (*.f64 y-scale y-scale))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) b)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 a #s(literal 0 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) b)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))) |
(* -1 (* b (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (/ (+ (* -1 (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 a) (* 2 a))))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* 4 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (+ (* -2 a) (* 2 a)))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) b)) (+ (* 1/8 (+ (* -1/2 (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (sin (* 1/180 (* angle (PI)))))))) b)) (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) b)) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))) |
(neg.f64 (*.f64 b (+.f64 (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (+.f64 (neg.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 a #s(literal 0 binary64))))))) (*.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 a #s(literal 0 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) b) (*.f64 #s(literal 1/8 binary64) (+.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64)))) (*.f64 y-scale y-scale))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) b)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 a #s(literal 0 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) b)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))) |
(+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (pow b 2)) (pow b 2))))) (* a (pow x-scale 2)))) (* 1/4 (* a (* (sqrt 2) (sqrt 8))))) |
(fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 #s(literal 0 binary64) (*.f64 b b))))) (*.f64 a (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/4 binary64) (*.f64 a (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (pow b 2)) (pow b 2))))) (* a (pow x-scale 2)))) (+ (* 1/4 (* a (* (sqrt 2) (sqrt 8)))) (* (pow angle 2) (+ (* 1/8 (+ (* -1/2 (/ (* (pow y-scale 4) (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1 (pow b 2)) (pow b 2)) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))))) (* (pow a 3) (pow x-scale 2)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))))))) (* a (pow x-scale 2))))) (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 2) (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))))) a)))))) |
(fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 #s(literal 0 binary64) (*.f64 b b))))) (*.f64 a (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/4 binary64) (*.f64 a (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (*.f64 angle angle) (*.f64 #s(literal 1/8 binary64) (+.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (*.f64 #s(literal 0 binary64) (*.f64 b b)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))))) (*.f64 (*.f64 a (*.f64 a a)) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))))) (*.f64 a a)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))) (*.f64 a a)))))))))) (*.f64 a (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))))) a)))))) |
(+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (pow b 2)) (pow b 2))))) (* a (pow x-scale 2)))) (+ (* 1/4 (* a (* (sqrt 2) (sqrt 8)))) (* (pow angle 2) (+ (* 1/8 (+ (* -1/2 (/ (* (pow y-scale 4) (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1 (pow b 2)) (pow b 2)) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))))) (* (pow a 3) (pow x-scale 2)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))))))) (* a (pow x-scale 2))))) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 2) (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))))) a)) (* (pow angle 2) (+ (* 1/8 (+ (* -1/2 (/ (* a (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (+ (* 1/4 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (/ (* (pow y-scale 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (pow a 4)))) (+ (* -1 (pow b 2)) (pow b 2)))))) (pow x-scale 2))) (+ (* -1/2 (/ (* (pow y-scale 4) (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2))))))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))))) (* (pow a 3) (pow x-scale 2)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (+ (* (pow b 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 2))))) (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))))) (pow a 2)) (+ (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))) (pow a 2))) (/ (* (pow y-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))) (pow a 2))))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))) (* a (pow x-scale 2)))))) (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 2) (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 2))))))) a))))))))) |
(fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 #s(literal 0 binary64) (*.f64 b b))))) (*.f64 a (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/4 binary64) (*.f64 a (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8 binary64) (+.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (*.f64 #s(literal 0 binary64) (*.f64 b b)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))))) (*.f64 (*.f64 a (*.f64 a a)) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))))) (*.f64 a a)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))) (*.f64 a a)))))))))) (*.f64 a (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))))) a)) (*.f64 (*.f64 angle angle) (*.f64 #s(literal 1/8 binary64) (+.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 a (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (+.f64 (neg.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))) (pow.f64 a #s(literal 6 binary64)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))) (pow.f64 a #s(literal 6 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)))) (pow.f64 a #s(literal 4 binary64))))) (*.f64 #s(literal 0 binary64) (*.f64 b b)))))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))))) (*.f64 a a)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))) (*.f64 a a))))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))))) (*.f64 (*.f64 a (*.f64 a a)) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale)) #s(literal -1/787320000 binary64))))) (*.f64 a a)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))))) (*.f64 a a)) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))))) (*.f64 a a)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))) (*.f64 a a)))))) (*.f64 a a)))) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)))))))) (*.f64 a (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))) (*.f64 a a))))))) a)))))))) |
(+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (pow b 2)) (pow b 2))))) (* a (pow x-scale 2)))) (+ (* 1/4 (* a (* (sqrt 2) (sqrt 8)))) (* (pow angle 2) (+ (* 1/8 (+ (* -1/2 (/ (* (pow y-scale 4) (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1 (pow b 2)) (pow b 2)) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))))) (* (pow a 3) (pow x-scale 2)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))))))) (* a (pow x-scale 2))))) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 2) (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))))) a)) (* (pow angle 2) (+ (* 1/8 (+ (* -1/2 (/ (* a (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (+ (* 1/4 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (/ (* (pow y-scale 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (pow a 4)))) (+ (* -1 (pow b 2)) (pow b 2)))))) (pow x-scale 2))) (+ (* -1/2 (/ (* (pow y-scale 4) (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2))))))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))))) (* (pow a 3) (pow x-scale 2)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (+ (* (pow b 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 2))))) (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))))) (pow a 2)) (+ (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))) (pow a 2))) (/ (* (pow y-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))) (pow a 2))))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))) (* a (pow x-scale 2)))))) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 2) (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 2))))))) a)) (* (pow angle 2) (+ (* 1/8 (+ (* -1/2 (/ (* a (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1 (/ (* (pow y-scale 2) (* (+ (* -1 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (/ (* (pow y-scale 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (pow a 4))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2))) (+ (* -1 (/ (* (pow y-scale 6) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))) (pow a 6))) (+ (* 1/2 (/ (* (pow y-scale 2) (* (+ (* -1 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (+ (* 1/4 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (/ (* (pow y-scale 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (pow a 4)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2))) (/ (* (pow y-scale 4) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (pow a 4))))) (+ (* -1 (pow b 2)) (pow b 2)))))) (pow x-scale 2))) (+ (* -1/2 (/ (* a (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (+ (* 1/4 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (/ (* (pow y-scale 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (pow a 4)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2))))))))))) (pow x-scale 2))) (+ (* -1/2 (/ (* (pow y-scale 4) (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (+ (* (pow b 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 2))))) (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))))) (pow a 2)) (+ (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))) (pow a 2))) (/ (* (pow y-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))) (pow a 2))))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))))))) (* (pow a 3) (pow x-scale 2)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (+ (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (+ (* (pow b 2) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))))) (pow y-scale 2)))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- b a) 2)))) (pow y-scale 2))) (/ (* (pow (+ a b) 2) (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- b a) 2))) (pow y-scale 2))))))) (pow a 2)) (+ (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))))) (pow a 2))) (+ (/ (* (pow y-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (+ (* (pow b 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 2))))) (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))))) (pow a 2)) (+ (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))) (pow a 2))) (/ (* (pow y-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))) (pow a 2)))))) (pow a 2)) (/ (* (pow y-scale 2) (* (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))) (pow a 2)))))) (+ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6))))))))) (* a (pow x-scale 2))))))) (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 2) (* (sqrt 8) (- (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 2)))))) (pow a 2))))))) a)))))))))))) |
(fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 #s(literal 0 binary64) (*.f64 b b))))) (*.f64 a (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/4 binary64) (*.f64 a (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8 binary64) (+.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (*.f64 #s(literal 0 binary64) (*.f64 b b)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))))) (*.f64 (*.f64 a (*.f64 a a)) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))))) (*.f64 a a)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))) (*.f64 a a)))))))))) (*.f64 a (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))))) a)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8 binary64) (+.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 a (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (+.f64 (neg.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))) (pow.f64 a #s(literal 6 binary64)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))) (pow.f64 a #s(literal 6 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)))) (pow.f64 a #s(literal 4 binary64))))) (*.f64 #s(literal 0 binary64) (*.f64 b b)))))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))))) (*.f64 a a)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))) (*.f64 a a))))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))))) (*.f64 (*.f64 a (*.f64 a a)) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale)) #s(literal -1/787320000 binary64))))) (*.f64 a a)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))))) (*.f64 a a)) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))))) (*.f64 a a)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))) (*.f64 a a)))))) (*.f64 a a)))) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)))))))) (*.f64 a (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))) (*.f64 a a))))))) a)) (*.f64 (*.f64 angle angle) (*.f64 #s(literal 1/8 binary64) (+.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 a (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (+.f64 (+.f64 (neg.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (+.f64 (neg.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))) (pow.f64 a #s(literal 6 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)))) (pow.f64 a #s(literal 4 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))) (*.f64 a a))) (neg.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))))) (pow.f64 a #s(literal 6 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (+.f64 (neg.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))) (pow.f64 a #s(literal 6 binary64)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))) (pow.f64 a #s(literal 6 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)))) (pow.f64 a #s(literal 4 binary64))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))) (*.f64 a a)) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (*.f64 y-scale y-scale)))) (pow.f64 a #s(literal 4 binary64))))) (*.f64 #s(literal 0 binary64) (*.f64 b b)))))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 a (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (+.f64 (neg.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))) (pow.f64 a #s(literal 6 binary64)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))) (pow.f64 a #s(literal 6 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)))) (pow.f64 a #s(literal 4 binary64))))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))))) (*.f64 a a)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))) (*.f64 a a))))))))))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale)) #s(literal -1/787320000 binary64))))) (*.f64 a a)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))))) (*.f64 a a)) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))))) (*.f64 a a)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))) (*.f64 a a)))))) (*.f64 a a)))) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))))))))) (*.f64 (*.f64 a (*.f64 a a)) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))) (fma.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)))) (fma.f64 (*.f64 b b) (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 4 binary64) (fma.f64 #s(literal 1/102036672000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))))))) (*.f64 a a)) (+.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 y-scale y-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (*.f64 y-scale y-scale))))) (*.f64 a a)) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale)) #s(literal -1/787320000 binary64))))) (*.f64 a a)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))))) (*.f64 a a)) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))))) (*.f64 a a)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))) (*.f64 a a)))))) (*.f64 a a)))))) (*.f64 a a))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))))) (*.f64 a a)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))) (*.f64 a a)))))) (*.f64 a a)))) (fma.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64)))))))) (*.f64 a (*.f64 x-scale x-scale)))))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (+.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))) (*.f64 a a)))))) (*.f64 a a))))))) a)))))))))) |
(+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) |
(+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) |
(+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) |
(+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) |
(+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) |
(+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) |
(+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) |
(+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) |
(+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/4 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 b (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))) |
(+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (+ (* 1/4 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* a (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))))))) (* (pow b 3) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))))) |
(fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 b (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/4 binary64) (fma.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (/.f64 (*.f64 a (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64))))))) (*.f64 (*.f64 b (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) |
(+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (+ (* 1/4 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* a (+ (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))))) (* (pow b 3) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* a (+ (* 1/8 (+ (* -1/2 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow b 3) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))))) (* 1/8 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))) (* b (sin (* 1/180 (* angle (PI))))))))))))) |
(fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 b (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 a (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64)))))) (*.f64 (*.f64 b (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 a (*.f64 #s(literal 1/8 binary64) (+.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 b (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64))))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 b (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 b (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))))) |
(+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (+ (* 1/4 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* a (+ (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))))) (* (pow b 3) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* a (+ (* 1/8 (* a (+ (* -1 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))))) (* (pow b 5) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (pow b 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))))))) (+ (* 1/8 (+ (* -1/2 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow b 3) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))))) (* 1/8 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))) (* b (sin (* 1/180 (* angle (PI)))))))))))))) |
(fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 b (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 a (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64)))))) (*.f64 (*.f64 b (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 a (fma.f64 #s(literal 1/8 binary64) (*.f64 a (+.f64 (neg.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64)))))) (*.f64 (pow.f64 b #s(literal 5 binary64)) (*.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b #s(literal 0 binary64))) (*.f64 b b)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (*.f64 b (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 #s(literal 1/8 binary64) (+.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 b (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64))))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 b (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 b (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))))) |
(* a (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(*.f64 a (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))) |
(* a (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (+ (* 1/4 (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))))))) |
(*.f64 a (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (fma.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 b #s(literal 0 binary64)))))) (*.f64 a (*.f64 (*.f64 x-scale x-scale) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) |
(* a (+ (* 1/8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (* (pow a 2) (cos (* 1/180 (* angle (PI))))))) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (+ (* 1/8 (/ (+ (* -1/2 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/4 (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))))))))) |
(*.f64 a (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 a a) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 x-scale x-scale) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64)))) (*.f64 y-scale y-scale))))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 (*.f64 x-scale x-scale) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 a a)) (*.f64 #s(literal 1/4 binary64) (fma.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 b #s(literal 0 binary64)))))) (*.f64 a (*.f64 (*.f64 x-scale x-scale) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))))) |
(* a (+ (* 1/8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (* (pow a 2) (cos (* 1/180 (* angle (PI))))))) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (+ (* 1/8 (/ (+ (* -1 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 b) (* 2 b))))))) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* 4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (+ (* -2 b) (* 2 b)))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (pow a 3))) (+ (* 1/8 (/ (+ (* -1/2 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/4 (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))))))))) |
(*.f64 a (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 a a) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (+.f64 (neg.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 b #s(literal 0 binary64))))))) (*.f64 (*.f64 x-scale x-scale) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 b #s(literal 0 binary64)))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 x-scale x-scale) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 a (*.f64 a a))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 x-scale x-scale) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64)))) (*.f64 y-scale y-scale))))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 (*.f64 x-scale x-scale) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 a a)) (*.f64 #s(literal 1/4 binary64) (fma.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 b #s(literal 0 binary64)))))) (*.f64 a (*.f64 (*.f64 x-scale x-scale) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))))) |
(* -1 (* a (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))) |
(neg.f64 (*.f64 a (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))) |
(* -1 (* a (+ (* -1/4 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))) |
(neg.f64 (*.f64 a (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 b #s(literal 0 binary64)))))) (*.f64 a (*.f64 (*.f64 x-scale x-scale) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))) |
(* -1 (* a (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/8 (+ (* -1/2 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (* 1/8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (cos (* 1/180 (* angle (PI))))))) a)) (* 1/4 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) a)) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))) |
(neg.f64 (*.f64 a (+.f64 (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (+.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 x-scale x-scale) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64)))) (*.f64 y-scale y-scale))))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 (*.f64 x-scale x-scale) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) a)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 b #s(literal 0 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) a)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))) |
(* -1 (* a (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (/ (+ (* -1 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 b) (* 2 b))))))) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* 4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (+ (* -2 b) (* 2 b)))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) a)) (+ (* 1/8 (+ (* -1/2 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (* 1/8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (cos (* 1/180 (* angle (PI)))))))) a)) (* 1/4 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) a)) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))) |
(neg.f64 (*.f64 a (+.f64 (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (+.f64 (neg.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 b #s(literal 0 binary64))))))) (*.f64 (*.f64 x-scale x-scale) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 b #s(literal 0 binary64)))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 x-scale x-scale) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) a) (*.f64 #s(literal 1/8 binary64) (+.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 x-scale x-scale) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64)))) (*.f64 y-scale y-scale))))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 (*.f64 x-scale x-scale) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) a)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 b #s(literal 0 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) a)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))) |
(* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) |
(/ (+ (* 1/8 (* (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* (pow x-scale 2) (* y-scale (* (sqrt 2) (sqrt 8)))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow x-scale 2)) |
(/.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 x-scale x-scale)) |
(/ (+ (* 1/8 (* (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* (pow x-scale 2) (* y-scale (* (sqrt 2) (sqrt 8)))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow x-scale 2)) |
(/.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 x-scale x-scale)) |
(/ (+ (* 1/8 (* (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* (pow x-scale 2) (* y-scale (* (sqrt 2) (sqrt 8)))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow x-scale 2)) |
(/.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 x-scale x-scale)) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) |
(+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) |
(+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) |
(+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) |
(+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) |
(+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) |
(+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) |
(* b (sqrt 2)) |
(*.f64 b (sqrt.f64 #s(literal 2 binary64))) |
(+ (* 1/2 (/ (* (pow angle 2) (* (sqrt 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))))) b)) (* b (sqrt 2))) |
(fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 angle angle) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))))))) b) (*.f64 b (sqrt.f64 #s(literal 2 binary64)))) |
(+ (* b (sqrt 2)) (* (pow angle 2) (+ (* 1/2 (/ (* (sqrt 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) b)) (* 1/2 (/ (* (pow angle 2) (* (sqrt 2) (- (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (* 1/4 (/ (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2) (pow b 2)))))) b))))) |
(fma.f64 b (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 angle angle) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64)))))) b) (/.f64 (*.f64 (*.f64 angle angle) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64)))))) (*.f64 b b)))))) b))))) |
(+ (* b (sqrt 2)) (* (pow angle 2) (+ (* 1/2 (/ (* (sqrt 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) b)) (* (pow angle 2) (+ (* 1/2 (/ (* (sqrt 2) (- (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (* 1/4 (/ (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2) (pow b 2))))) b)) (* 1/2 (/ (* (pow angle 2) (* (sqrt 2) (- (+ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6))))) (* 1/2 (/ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (- (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (* 1/4 (/ (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2) (pow b 2))))) (pow b 2)))))) b))))))) |
(fma.f64 b (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64)))))) b) (*.f64 (*.f64 angle angle) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64)))))) (*.f64 b b))))) b) (/.f64 (*.f64 (*.f64 angle angle) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (fma.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))))) (+.f64 (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64)))))) (*.f64 b b))))) (*.f64 b b)))))) b))))))) |
(* (sqrt 2) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) |
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) |
(* (sqrt 2) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) |
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) |
(* (sqrt 2) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) |
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) |
(* (sqrt 2) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) |
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) |
(* (sqrt 2) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) |
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) |
(* (sqrt 2) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) |
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) |
(* (sqrt 2) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) |
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) |
(* (sqrt 2) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) |
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) |
(* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))) |
(*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))) |
(+ (* 1/2 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (sqrt 2))) (* a (sin (* 1/180 (* angle (PI))))))) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) |
(fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) |
(+ (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))) (* (pow b 2) (+ (* -1/8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (sqrt 2))) (* (pow a 3) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* 1/2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (sqrt 2)) (* a (sin (* 1/180 (* angle (PI)))))))))) |
(fma.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a (*.f64 a a)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) |
(+ (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))) (* (pow b 2) (+ (* 1/2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (sqrt 2)) (* a (sin (* 1/180 (* angle (PI))))))) (* (pow b 2) (+ (* -1/8 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (sqrt 2)) (* (pow a 3) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* 1/16 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 6) (sqrt 2))) (* (pow a 5) (pow (sin (* 1/180 (* angle (PI)))) 5))))))))) |
(fma.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a (*.f64 a a)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 5 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)))))))))) |
(* b (* (cos (* 1/180 (* angle (PI)))) (sqrt 2))) |
(*.f64 b (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))) |
(* b (+ (* 1/2 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 2))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* (cos (* 1/180 (* angle (PI)))) (sqrt 2)))) |
(*.f64 b (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 b b) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) |
(* b (+ (* -1/8 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 2))) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/2 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 2))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* (cos (* 1/180 (* angle (PI)))) (sqrt 2))))) |
(*.f64 b (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 b b) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))) |
(* b (+ (* -1/8 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 2))) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/16 (/ (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (sqrt 2))) (* (pow b 6) (pow (cos (* 1/180 (* angle (PI)))) 5)))) (+ (* 1/2 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 2))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* (cos (* 1/180 (* angle (PI)))) (sqrt 2)))))) |
(*.f64 b (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 b b) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))) |
(* -1 (* b (* (cos (* 1/180 (* angle (PI)))) (sqrt 2)))) |
(neg.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) |
(* -1 (* b (+ (* 1/2 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 2))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* (cos (* 1/180 (* angle (PI)))) (sqrt 2))))) |
(neg.f64 (*.f64 b (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 b b) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))) |
(* -1 (* b (+ (* -1/8 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 2))) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/2 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 2))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* (cos (* 1/180 (* angle (PI)))) (sqrt 2)))))) |
(neg.f64 (*.f64 b (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 b b) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))) |
(* -1 (* b (+ (* -1/8 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 2))) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/16 (/ (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (sqrt 2))) (* (pow b 6) (pow (cos (* 1/180 (* angle (PI)))) 5)))) (+ (* 1/2 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 2))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* (cos (* 1/180 (* angle (PI)))) (sqrt 2))))))) |
(neg.f64 (*.f64 b (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 b b) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))) |
(* b (* (cos (* 1/180 (* angle (PI)))) (sqrt 2))) |
(*.f64 b (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))) |
(+ (* 1/2 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 2))) (* b (cos (* 1/180 (* angle (PI))))))) (* b (* (cos (* 1/180 (* angle (PI)))) (sqrt 2)))) |
(fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 b (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 b (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) |
(+ (* b (* (cos (* 1/180 (* angle (PI)))) (sqrt 2))) (* (pow a 2) (+ (* -1/8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 2))) (* (pow b 3) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (* 1/2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 2)) (* b (cos (* 1/180 (* angle (PI)))))))))) |
(fma.f64 b (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 b (*.f64 b b)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 b (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) |
(+ (* b (* (cos (* 1/180 (* angle (PI)))) (sqrt 2))) (* (pow a 2) (+ (* 1/2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 2)) (* b (cos (* 1/180 (* angle (PI))))))) (* (pow a 2) (+ (* -1/8 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 2)) (* (pow b 3) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (* 1/16 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (sqrt 2))) (* (pow b 5) (pow (cos (* 1/180 (* angle (PI)))) 5))))))))) |
(fma.f64 b (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 b (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 b (*.f64 b b)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 5 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)))))))))) |
(* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))) |
(*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))) |
(* a (+ (* 1/2 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (sqrt 2))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) |
(*.f64 a (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) |
(* a (+ (* -1/8 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (sqrt 2))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/2 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (sqrt 2))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) |
(*.f64 a (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))) |
(* a (+ (* -1/8 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (sqrt 2))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/16 (/ (* (pow b 6) (* (pow (cos (* 1/180 (* angle (PI)))) 6) (sqrt 2))) (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 5)))) (+ (* 1/2 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (sqrt 2))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))) |
(*.f64 a (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 6 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))) |
(* -1 (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) |
(neg.f64 (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) |
(* -1 (* a (+ (* 1/2 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (sqrt 2))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) |
(neg.f64 (*.f64 a (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))) |
(* -1 (* a (+ (* -1/8 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (sqrt 2))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/2 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (sqrt 2))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))) |
(neg.f64 (*.f64 a (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))) |
(* -1 (* a (+ (* -1/8 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (sqrt 2))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/16 (/ (* (pow b 6) (* (pow (cos (* 1/180 (* angle (PI)))) 6) (sqrt 2))) (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 5)))) (+ (* 1/2 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (sqrt 2))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))) |
(neg.f64 (*.f64 a (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 6 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))) |
1 |
#s(literal 1 binary64) |
(+ 1 (* -1/64800 (* (pow angle 2) (pow (PI) 2)))) |
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/64800 binary64) (*.f64 (*.f64 angle angle) (*.f64 (PI.f64) (PI.f64))))) |
(+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* 1/25194240000 (* (pow angle 2) (pow (PI) 4)))))) |
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/64800 binary64) (*.f64 (PI.f64) (PI.f64)) (*.f64 #s(literal 1/25194240000 binary64) (*.f64 (*.f64 angle angle) (pow.f64 (PI.f64) #s(literal 4 binary64))))))) |
(+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/24488801280000000 (* (pow angle 2) (pow (PI) 6))) (* 1/25194240000 (pow (PI) 4))))))) |
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/64800 binary64) (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/24488801280000000 binary64) (*.f64 (*.f64 angle angle) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/25194240000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) |
(cos (* 1/180 (* angle (PI)))) |
(cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
(cos (* 1/180 (* angle (PI)))) |
(cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
(cos (* 1/180 (* angle (PI)))) |
(cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
(cos (* 1/180 (* angle (PI)))) |
(cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
(cos (* 1/180 (* angle (PI)))) |
(cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
(cos (* 1/180 (* angle (PI)))) |
(cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
(cos (* 1/180 (* angle (PI)))) |
(cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
(cos (* 1/180 (* angle (PI)))) |
(cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
(* 1/180 (* angle (PI))) |
(*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) |
(* angle (+ (* -1/34992000 (* (pow angle 2) (pow (PI) 3))) (* 1/180 (PI)))) |
(*.f64 angle (fma.f64 #s(literal -1/34992000 binary64) (*.f64 (*.f64 angle angle) (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64)))) (*.f64 #s(literal 1/180 binary64) (PI.f64)))) |
(* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* 1/22674816000000 (* (pow angle 2) (pow (PI) 5))))))) |
(*.f64 angle (fma.f64 #s(literal 1/180 binary64) (PI.f64) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/34992000 binary64) (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 (*.f64 angle angle) (pow.f64 (PI.f64) #s(literal 5 binary64)))))))) |
(* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* (pow angle 2) (+ (* -1/30855889612800000000 (* (pow angle 2) (pow (PI) 7))) (* 1/22674816000000 (pow (PI) 5)))))))) |
(*.f64 angle (fma.f64 #s(literal 1/180 binary64) (PI.f64) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/34992000 binary64) (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/30855889612800000000 binary64) (*.f64 (*.f64 angle angle) (pow.f64 (PI.f64) #s(literal 7 binary64))) (*.f64 #s(literal 1/22674816000000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))))))))) |
(sin (* 1/180 (* angle (PI)))) |
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
(sin (* 1/180 (* angle (PI)))) |
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
(sin (* 1/180 (* angle (PI)))) |
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
(sin (* 1/180 (* angle (PI)))) |
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
(sin (* 1/180 (* angle (PI)))) |
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
(sin (* 1/180 (* angle (PI)))) |
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
(sin (* 1/180 (* angle (PI)))) |
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
(sin (* 1/180 (* angle (PI)))) |
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
(* y-scale (sqrt 2)) |
(*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) |
(* y-scale (sqrt 2)) |
(*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) |
(* y-scale (sqrt 2)) |
(*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) |
(* y-scale (sqrt 2)) |
(*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) |
(* y-scale (sqrt 2)) |
(*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) |
(* y-scale (sqrt 2)) |
(*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) |
(* y-scale (sqrt 2)) |
(*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) |
(* y-scale (sqrt 2)) |
(*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) |
(* y-scale (sqrt 2)) |
(*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) |
(* y-scale (sqrt 2)) |
(*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) |
(* y-scale (sqrt 2)) |
(*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) |
(* y-scale (sqrt 2)) |
(*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) |
(sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) |
(sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) |
(+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* 1/2 (* (* (pow a 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) |
(+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) |
(+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* (pow a 2) (+ (* 1/2 (* (* (pow a 2) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))) |
(+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (*.f64 (*.f64 a a) (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (*.f64 a a) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))))) |
(+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* (pow a 2) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow a 2) (+ (* -1/4 (* (* (pow a 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))))))) |
(+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (*.f64 a a) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))))))))) |
(* (pow a 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) |
(*.f64 (*.f64 a a) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) |
(* (pow a 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) |
(*.f64 (*.f64 a a) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (*.f64 a a)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))))) |
(* (pow a 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow a 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))) |
(*.f64 (*.f64 a a) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (fma.f64 (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (*.f64 a a)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (*.f64 (/.f64 (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (pow.f64 a #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))))) |
(* (pow a 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* -1/4 (* (/ (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (pow a 6)) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow a 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))) |
(*.f64 (*.f64 a a) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (pow.f64 a #s(literal 6 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (*.f64 a a)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (*.f64 (/.f64 (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (pow.f64 a #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))))))) |
(* (pow a 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) |
(*.f64 (*.f64 a a) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) |
(* (pow a 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) |
(*.f64 (*.f64 a a) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (*.f64 a a)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))))) |
(* (pow a 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow a 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))) |
(*.f64 (*.f64 a a) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (fma.f64 (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (*.f64 a a)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (*.f64 (/.f64 (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (pow.f64 a #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))))) |
(* (pow a 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* -1/4 (* (/ (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (pow a 6)) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow a 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))) |
(*.f64 (*.f64 a a) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (pow.f64 a #s(literal 6 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (*.f64 a a)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (*.f64 (/.f64 (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (pow.f64 a #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))))))) |
(- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) |
(-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) |
(- (+ (* 1/2 (/ (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (pow b 2) (pow x-scale 2))) (/ (pow a 2) (pow y-scale 2))) |
(fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) |
(- (+ (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))) (/ (pow b 2) (pow x-scale 2))) (/ (pow a 2) (pow y-scale 2))) |
(fma.f64 (*.f64 angle angle) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 angle angle) (+.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal -1/787320000 binary64)) (pow.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) |
(- (+ (* (pow angle 2) (+ (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (/ (pow b 2) (pow x-scale 2))) (/ (pow a 2) (pow y-scale 2))) |
(fma.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 angle angle) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 angle angle) (+.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)))))) (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (fma.f64 #s(literal 1/102036672000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (+.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal -1/787320000 binary64)) (pow.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (+.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal -1/787320000 binary64)) (pow.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) |
(sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) |
(sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) |
(sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) |
(sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) |
(sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) |
(sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) |
(sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) |
(sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) |
(sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) |
(sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) |
(sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) |
(sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) |
(sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) |
(sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) |
(sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) |
(sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) |
(sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) |
(sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) |
(+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* 1/2 (* (* (pow b 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) |
(+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) |
(+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* (pow b 2) (+ (* 1/2 (* (* (pow b 2) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))) |
(+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (*.f64 (*.f64 b b) (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (*.f64 b b) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))))) |
(+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* (pow b 2) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow b 2) (+ (* -1/4 (* (* (pow b 2) (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))))))) |
(+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (*.f64 b b) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))))))))) |
(* (pow b 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) |
(*.f64 (*.f64 b b) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) |
(* (pow b 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) |
(*.f64 (*.f64 b b) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (*.f64 b b)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))))) |
(* (pow b 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow b 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))) |
(*.f64 (*.f64 b b) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (fma.f64 (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (*.f64 b b)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (*.f64 (/.f64 (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (pow.f64 b #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))))) |
(* (pow b 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* -1/4 (* (/ (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (pow b 6)) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow b 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))) |
(*.f64 (*.f64 b b) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (pow.f64 b #s(literal 6 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (*.f64 b b)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (*.f64 (/.f64 (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (pow.f64 b #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))))))) |
(* (pow b 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) |
(*.f64 (*.f64 b b) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) |
(* (pow b 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) |
(*.f64 (*.f64 b b) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (*.f64 b b)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))))) |
(* (pow b 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow b 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))) |
(*.f64 (*.f64 b b) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (fma.f64 (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (*.f64 b b)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (*.f64 (/.f64 (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (pow.f64 b #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))))) |
(* (pow b 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* -1/4 (* (/ (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (pow b 6)) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow b 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))) |
(*.f64 (*.f64 b b) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (pow.f64 b #s(literal 6 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (*.f64 b b)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (*.f64 (/.f64 (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (pow.f64 b #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))))))) |
(/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)) |
(/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale x-scale)) |
(/ (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)) |
(/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) |
(/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (+ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))) (pow x-scale 2)) |
(/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))))) (*.f64 x-scale x-scale)) |
(/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (+ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))))) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))) (pow x-scale 2)) |
(/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))))))) (*.f64 x-scale x-scale)) |
(+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) |
(+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) |
(+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) |
(fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 x-scale x-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) |
(+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (* (pow x-scale 4) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) |
(fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 x-scale x-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) |
(+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 6) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (* (pow x-scale 4) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) |
(fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 x-scale x-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) |
(+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) |
(+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) |
(+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) |
(fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 x-scale x-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) |
(+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (* (pow x-scale 4) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) |
(fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 x-scale x-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) |
(+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 6) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (* (pow x-scale 4) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) |
(fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 x-scale x-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) |
(/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)) |
(/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) |
(/ (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)) |
(/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)) |
(/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (+ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow y-scale 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (pow y-scale 2)) |
(/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale y-scale) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))))) (*.f64 y-scale y-scale)) |
(/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (+ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow y-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))) (pow y-scale 2)) |
(/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))))))) (*.f64 y-scale y-scale)) |
(+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) |
(+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) |
(+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) |
(fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 y-scale y-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) |
(+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (* (pow y-scale 4) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) |
(fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 y-scale y-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))) |
(+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 6) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (* (pow y-scale 4) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) |
(fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 y-scale y-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) |
(+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) |
(+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) |
(+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) |
(fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 y-scale y-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) |
(+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (* (pow y-scale 4) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) |
(fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 y-scale y-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))) |
(+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 6) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (* (pow y-scale 4) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) |
(fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 y-scale y-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) |
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) |
1 |
#s(literal 1 binary64) |
(+ 1 (* -1/64800 (* (pow angle 2) (pow (PI) 2)))) |
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/64800 binary64) (*.f64 (*.f64 angle angle) (*.f64 (PI.f64) (PI.f64))))) |
(+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* 1/25194240000 (* (pow angle 2) (pow (PI) 4)))))) |
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/64800 binary64) (*.f64 (PI.f64) (PI.f64)) (*.f64 #s(literal 1/25194240000 binary64) (*.f64 (*.f64 angle angle) (pow.f64 (PI.f64) #s(literal 4 binary64))))))) |
(+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/24488801280000000 (* (pow angle 2) (pow (PI) 6))) (* 1/25194240000 (pow (PI) 4))))))) |
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/64800 binary64) (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/24488801280000000 binary64) (*.f64 (*.f64 angle angle) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/25194240000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) |
(cos (* 1/180 (* angle (PI)))) |
(cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
(cos (* 1/180 (* angle (PI)))) |
(cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
(cos (* 1/180 (* angle (PI)))) |
(cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
(cos (* 1/180 (* angle (PI)))) |
(cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
(cos (* 1/180 (* angle (PI)))) |
(cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
(cos (* 1/180 (* angle (PI)))) |
(cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
(cos (* 1/180 (* angle (PI)))) |
(cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
(cos (* 1/180 (* angle (PI)))) |
(cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))) |
(+ (* 1/16 (* (/ (* a (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) |
(fma.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (*.f64 a (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))) (* a (+ (* 1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* 1/8 (* (* a (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (+ (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (sqrt (/ 1 (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))) (*.f64 a (fma.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64)))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64)) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64)) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))) (* a (+ (* 1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* a (+ (* 1/8 (* (* a (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 (pow b 3)) (* 2 (pow b 3))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (* 1/4 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 (pow b 3)) (* 2 (pow b 3))) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (+ (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))) (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (+ (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))) (sqrt (/ 1 (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))) (*.f64 a (fma.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64)))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 a (*.f64 #s(literal 1/8 binary64) (fma.f64 (*.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b #s(literal 0 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64)) (+.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64)) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64)) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64)) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64)) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64)) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))))))))) |
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)))))))) |
(* a (+ (* 1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))) (* a (* x-scale y-scale))) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) |
(*.f64 a (fma.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 b #s(literal 0 binary64)))) (*.f64 a (*.f64 x-scale y-scale))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)))))))))) |
(* a (+ (* 1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))) (* a (* x-scale y-scale))) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))))))) (pow a 2)) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))))) |
(*.f64 a (fma.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 b #s(literal 0 binary64)))) (*.f64 a (*.f64 x-scale y-scale))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 b #s(literal 0 binary64)) (*.f64 b #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 b #s(literal 0 binary64)) (*.f64 b #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)))))))))))))) (*.f64 a a)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))))))))))) |
(* a (+ (* 1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))) (* a (* x-scale y-scale))) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 b) (* 2 b)) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (* 1/4 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 b) (* 2 b)) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))))))) (pow a 3)) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))))))) (pow a 2)) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))))) |
(*.f64 a (fma.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 b #s(literal 0 binary64)))) (*.f64 a (*.f64 x-scale y-scale))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b #s(literal 0 binary64)) (+.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 b #s(literal 0 binary64)) (*.f64 b #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b #s(literal 0 binary64)) (+.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 b #s(literal 0 binary64)) (*.f64 b #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 b #s(literal 0 binary64)) (*.f64 b #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))))))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))))))))) (*.f64 a (*.f64 a a))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 b #s(literal 0 binary64)) (*.f64 b #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 b #s(literal 0 binary64)) (*.f64 b #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)))))))))))))) (*.f64 a a)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)))))))))))) |
(* -1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) |
(*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 a (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)))))))) |
(* -1 (* a (+ (* -1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))) (* a (* x-scale y-scale))) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))))) |
(neg.f64 (*.f64 a (fma.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 b #s(literal 0 binary64)))) (*.f64 a (*.f64 x-scale y-scale))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))))))))))) |
(* -1 (* a (+ (* -1 (/ (+ (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))))))) a) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))) (* 1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))))) a)) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))))) |
(neg.f64 (*.f64 a (+.f64 (neg.f64 (/.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 b #s(literal 0 binary64)) (*.f64 b #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 b #s(literal 0 binary64)) (*.f64 b #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)))))))))))))) a) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)))))))) (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 b #s(literal 0 binary64)))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))))))))))) a)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))))))))))) |
(* -1 (* a (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 b) (* 2 b)) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (* 1/4 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 b) (* 2 b)) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))))))) a) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))) (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))))))) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) a)) (* 1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))))) a)) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))))) |
(neg.f64 (*.f64 a (+.f64 (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b #s(literal 0 binary64)) (+.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 b #s(literal 0 binary64)) (*.f64 b #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b #s(literal 0 binary64)) (+.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 b #s(literal 0 binary64)) (*.f64 b #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 b #s(literal 0 binary64)) (*.f64 b #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))))))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))))))))) a) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)))))))) (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 b #s(literal 0 binary64)) (*.f64 b #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 b #s(literal 0 binary64)) (*.f64 b #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)))))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)))))))))) a)) (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 b #s(literal 0 binary64)))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))))))))))) a)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))) |
(+ (* 1/16 (* (/ (* b (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) |
(fma.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (*.f64 b (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64))))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* b (+ (* 1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* 1/8 (* (* b (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (+ (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (sqrt (/ 1 (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))))) (*.f64 b (fma.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64)))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64)) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)))))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64)) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* b (+ (* 1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* b (+ (* 1/8 (* (* b (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 (pow a 3)) (* 2 (pow a 3))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (* 1/4 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 (pow a 3)) (* 2 (pow a 3))) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (+ (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (+ (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (sqrt (/ 1 (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))))) (*.f64 b (fma.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64)))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 b (*.f64 #s(literal 1/8 binary64) (fma.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a #s(literal 0 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64)) (+.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64)) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64)) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)))))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64)) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64)) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)))))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64)) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))))))))) |
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))))) |
(* b (+ (* 1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))) (* b (* x-scale y-scale))) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) |
(*.f64 b (fma.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 b (*.f64 x-scale y-scale))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))))))) |
(* b (+ (* 1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))) (* b (* x-scale y-scale))) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))))))) (pow b 2)) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))))) |
(*.f64 b (fma.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 b (*.f64 x-scale y-scale))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 a #s(literal 0 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 a #s(literal 0 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))))))))))) (*.f64 b b)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))))))))) |
(* b (+ (* 1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))) (* b (* x-scale y-scale))) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 a) (* 2 a)) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (* 1/4 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 a) (* 2 a)) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))))))) (pow b 3)) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))))))) (pow b 2)) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))))) |
(*.f64 b (fma.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 b (*.f64 x-scale y-scale))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a #s(literal 0 binary64)) (+.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 a #s(literal 0 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a #s(literal 0 binary64)) (+.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 a #s(literal 0 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 a #s(literal 0 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))))))))) (*.f64 b (*.f64 b b))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 a #s(literal 0 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 a #s(literal 0 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))))))))))) (*.f64 b b)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))))))))) |
(* -1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))) |
(*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))))) |
(* -1 (* b (+ (* -1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))) (* b (* x-scale y-scale))) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))))) |
(neg.f64 (*.f64 b (fma.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 b (*.f64 x-scale y-scale))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))))))))) |
(* -1 (* b (+ (* -1 (/ (+ (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))))))) b) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (* 1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))))) b)) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))))) |
(neg.f64 (*.f64 b (+.f64 (neg.f64 (/.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 a #s(literal 0 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 a #s(literal 0 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))))))))))) b) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))))) (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))))))))) b)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))))))))) |
(* -1 (* b (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 a) (* 2 a)) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (* 1/4 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 a) (* 2 a)) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))))))) b) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))))))) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) b)) (* 1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))))) b)) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))))) |
(neg.f64 (*.f64 b (+.f64 (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a #s(literal 0 binary64)) (+.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 a #s(literal 0 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a #s(literal 0 binary64)) (+.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 a #s(literal 0 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 a #s(literal 0 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))))))))) b) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))))) (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 a #s(literal 0 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 a #s(literal 0 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))))))) b)) (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))))))))) b)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))))))))) |
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))))) |
(+ (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) |
(fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))))) |
(+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 #s(literal 1/8 binary64) (fma.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))))))))) |
(+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 #s(literal 1/8 binary64) (fma.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) #s(literal 2 binary64)))))) (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))))) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))) |
(*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) |
(*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))))) (pow.f64 x-scale #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))) (pow x-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))))) |
(*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))))) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))))) (pow.f64 x-scale #s(literal 6 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))))) (pow.f64 x-scale #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))))))) |
(* -1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))) |
(*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))) |
(* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) |
(neg.f64 (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))))))) |
(* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))))) |
(neg.f64 (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))))) (pow.f64 x-scale #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))))))) |
(* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))) (pow x-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))))) |
(neg.f64 (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))))) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))))) (pow.f64 x-scale #s(literal 6 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))))) (pow.f64 x-scale #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))))))))) |
(* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))))) |
(+ (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) |
(fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))))) |
(+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))) (*.f64 (*.f64 y-scale y-scale) (*.f64 #s(literal 1/8 binary64) (fma.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))) (*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))))))))) |
(+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))))) (*.f64 (*.f64 y-scale y-scale) (*.f64 #s(literal 1/8 binary64) (fma.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))) (*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) #s(literal 2 binary64)))))) (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))))) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))) |
(* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))) |
(*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))) (*.f64 y-scale y-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))))) |
(* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) |
(*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))) (*.f64 y-scale y-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))))) (pow.f64 y-scale #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))))))))) |
(* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))) (pow y-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))))) |
(*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))) (*.f64 y-scale y-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)))))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))))))) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))))) (pow.f64 y-scale #s(literal 6 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))))) (pow.f64 y-scale #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))))))) |
(* -1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) |
(*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))) |
(* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) |
(neg.f64 (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))) (*.f64 y-scale y-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))))))))) |
(* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))))) |
(neg.f64 (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))) (*.f64 y-scale y-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))))) (pow.f64 y-scale #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))))))) |
(* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))) (pow y-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))))) |
(neg.f64 (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))) (*.f64 y-scale y-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)))))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))))))) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))))) (pow.f64 y-scale #s(literal 6 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))))) (pow.f64 y-scale #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))))))))))) |
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))))))) (* b (sqrt 2)))) (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))) |
(fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 angle angle) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))))))))) (*.f64 b (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))) |
(+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/2 (/ (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))))) (* b (sqrt 2))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 angle angle) (*.f64 #s(literal 1/8 binary64) (+.f64 (/.f64 (*.f64 (*.f64 angle angle) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fma.f64 #s(literal -1/196830000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (pow.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))))))))) (*.f64 b (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))))))) (*.f64 b (sqrt.f64 #s(literal 2 binary64)))))))) |
(+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))))) (* b (sqrt 2)))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow y-scale 2))) (+ (* -1/765275040000000 (/ (* (pow b 2) (pow (PI) 6)) (pow x-scale 2))) (+ (* 1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow x-scale 2))) (+ (* 1/765275040000000 (/ (* (pow b 2) (pow (PI) 6)) (pow y-scale 2))) (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))))) (+ (* 2 (* (- (+ (* -1/765275040000000 (/ (* (pow b 2) (pow (PI) 6)) (pow x-scale 2))) (* 1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow x-scale 2)))) (+ (* -1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow y-scale 2))) (* 1/765275040000000 (/ (* (pow b 2) (pow (PI) 6)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow (+ a b) 2) (* (+ (* 1/31886460000000 (pow (PI) 6)) (* 1/19131876000000 (pow (PI) 6))) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (* 1/2 (/ (* (pow x-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/2 (/ (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/2 (/ (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2)))))))) (* b (sqrt 2))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))))))) (*.f64 b (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 angle angle) (*.f64 #s(literal 1/8 binary64) (+.f64 (/.f64 (*.f64 (*.f64 angle angle) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (fma.f64 #s(literal -1/765275040000000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/765275040000000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/765275040000000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/765275040000000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)))))) (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/765275040000000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/765275040000000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/765275040000000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/765275040000000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/11957422500000 binary64)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (+.f64 (fma.f64 #s(literal -1/196830000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (pow.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fma.f64 #s(literal -1/196830000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (pow.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))))))) (*.f64 (*.f64 b b) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))))))) (*.f64 b (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fma.f64 #s(literal -1/196830000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (pow.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))))))) (*.f64 b (sqrt.f64 #s(literal 2 binary64)))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))))) |
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal 8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) |
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal 8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) |
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal 8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) |
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal 8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) |
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal 8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) |
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal 8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) |
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal 8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) |
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal 8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) |
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal 8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) |
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal 8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) |
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal 8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) |
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal 8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) |
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal 8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) |
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal 8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) |
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal 8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) |
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal 8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) |
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal 8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) |
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal 8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) |
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal 8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) |
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal 8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) |
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal 8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) |
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal 8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) |
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal 8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) |
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal 8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) |
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal 8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) |
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal 8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) |
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal 8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) |
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal 8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) |
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal 8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) |
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal 8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) |
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal 8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) |
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal 8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) |
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal 8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) |
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal 8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) |
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal 8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) |
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal 8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) |
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal 8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) |
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal 8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) |
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal 8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) |
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal 8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) |
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal 8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) |
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal 8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) |
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal 8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) |
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal 8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) |
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal 8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) |
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal 8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) |
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal 8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) |
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2)))) |
(*.f64 #s(literal 8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) |
(* 1/90 (* angle (PI))) |
(*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))) |
(* angle (+ (* -1/4374000 (* (pow angle 2) (pow (PI) 3))) (* 1/90 (PI)))) |
(*.f64 angle (fma.f64 #s(literal -1/4374000 binary64) (*.f64 (*.f64 angle angle) (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64)))) (*.f64 #s(literal 1/90 binary64) (PI.f64)))) |
(* angle (+ (* 1/90 (PI)) (* (pow angle 2) (+ (* -1/4374000 (pow (PI) 3)) (* 1/708588000000 (* (pow angle 2) (pow (PI) 5))))))) |
(*.f64 angle (fma.f64 #s(literal 1/90 binary64) (PI.f64) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/4374000 binary64) (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/708588000000 binary64) (*.f64 (*.f64 angle angle) (pow.f64 (PI.f64) #s(literal 5 binary64)))))))) |
(* angle (+ (* 1/90 (PI)) (* (pow angle 2) (+ (* -1/4374000 (pow (PI) 3)) (* (pow angle 2) (+ (* -1/241061637600000000 (* (pow angle 2) (pow (PI) 7))) (* 1/708588000000 (pow (PI) 5)))))))) |
(*.f64 angle (fma.f64 #s(literal 1/90 binary64) (PI.f64) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/4374000 binary64) (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/241061637600000000 binary64) (*.f64 (*.f64 angle angle) (pow.f64 (PI.f64) #s(literal 7 binary64))) (*.f64 #s(literal 1/708588000000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))))))))) |
(sin (* 1/90 (* angle (PI)))) |
(sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) |
(sin (* 1/90 (* angle (PI)))) |
(sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) |
(sin (* 1/90 (* angle (PI)))) |
(sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) |
(sin (* 1/90 (* angle (PI)))) |
(sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) |
(sin (* 1/90 (* angle (PI)))) |
(sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) |
(sin (* 1/90 (* angle (PI)))) |
(sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) |
(sin (* 1/90 (* angle (PI)))) |
(sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) |
(sin (* 1/90 (* angle (PI)))) |
(sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) |
1 |
#s(literal 1 binary64) |
(+ 1 (* -1/16200 (* (pow angle 2) (pow (PI) 2)))) |
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/16200 binary64) (*.f64 (*.f64 angle angle) (*.f64 (PI.f64) (PI.f64))))) |
(+ 1 (* (pow angle 2) (+ (* -1/16200 (pow (PI) 2)) (* 1/1574640000 (* (pow angle 2) (pow (PI) 4)))))) |
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/16200 binary64) (*.f64 (PI.f64) (PI.f64)) (*.f64 #s(literal 1/1574640000 binary64) (*.f64 (*.f64 angle angle) (pow.f64 (PI.f64) #s(literal 4 binary64))))))) |
(+ 1 (* (pow angle 2) (+ (* -1/16200 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/382637520000000 (* (pow angle 2) (pow (PI) 6))) (* 1/1574640000 (pow (PI) 4))))))) |
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/16200 binary64) (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/382637520000000 binary64) (*.f64 (*.f64 angle angle) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1574640000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) |
(cos (* 1/90 (* angle (PI)))) |
(cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) |
(cos (* 1/90 (* angle (PI)))) |
(cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) |
(cos (* 1/90 (* angle (PI)))) |
(cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) |
(cos (* 1/90 (* angle (PI)))) |
(cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) |
(cos (* 1/90 (* angle (PI)))) |
(cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) |
(cos (* 1/90 (* angle (PI)))) |
(cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) |
(cos (* 1/90 (* angle (PI)))) |
(cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) |
(cos (* 1/90 (* angle (PI)))) |
(cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) |
(/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) |
(/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) |
(+ (* 4 (/ (* b (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (pow a 2))) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) |
(fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 b (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64)))) (*.f64 a a)) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) |
(+ (* b (+ (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (pow a 2))) (* b (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) |
(fma.f64 b (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64))) (*.f64 a a)) (*.f64 b (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) |
(+ (* b (+ (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (pow a 2))) (* b (- (+ (* b (- (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (pow a 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) |
(fma.f64 b (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64))) (*.f64 a a)) (*.f64 b (-.f64 (fma.f64 b (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a #s(literal 0 binary64))) (*.f64 a a)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) |
(/ (* (pow b 2) (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) |
(/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) |
(* (pow b 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) b)) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) |
(*.f64 (*.f64 b b) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a #s(literal 0 binary64))) b) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) |
(* (pow b 2) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) b)) (+ (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4))))) |
(*.f64 (*.f64 b b) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a #s(literal 0 binary64))) b) (+.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) |
(* (pow b 2) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) b)) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (pow b 3))) (+ (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* 4 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (+ (* -2 a) (* 2 a)))) (* (pow b 3) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) |
(*.f64 (*.f64 b b) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a #s(literal 0 binary64))) b) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64))) (*.f64 b (*.f64 b b))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 (*.f64 b (*.f64 b b)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) |
(/ (* (pow b 2) (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) |
(/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) |
(* (pow b 2) (+ (* -4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) b)) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) |
(*.f64 (*.f64 b b) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a #s(literal 0 binary64))) b) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) |
(* (pow b 2) (+ (* -1 (/ (+ (* -1 (/ (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) b)) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))))) b)) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) |
(*.f64 (*.f64 b b) (+.f64 (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64)))) (*.f64 y-scale y-scale))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) b)) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a #s(literal 0 binary64))))) b)) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) |
(* (pow b 2) (+ (* -1 (/ (+ (* -1 (/ (- (+ (* -1 (/ (- (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* 4 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (+ (* -2 a) (* 2 a)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) b)) (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) b)) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))))) b)) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) |
(*.f64 (*.f64 b b) (+.f64 (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 a #s(literal 0 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) b)) (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64)))) (*.f64 y-scale y-scale))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) b)) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a #s(literal 0 binary64))))) b)) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) |
(* -2 (pow b 2)) |
(*.f64 #s(literal -2 binary64) (*.f64 b b)) |
(+ (* -2 (pow b 2)) (* (pow angle 2) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))) |
(fma.f64 #s(literal -2 binary64) (*.f64 b b) (*.f64 (*.f64 angle angle) (+.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))))) (*.f64 a a)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))) (*.f64 a a)))))) |
(+ (* -2 (pow b 2)) (* (pow angle 2) (- (+ (* (pow angle 2) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (+ (* (pow b 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 2))))) (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))))) (pow a 2)) (+ (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))) (pow a 2))) (/ (* (pow y-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))) (pow a 2))))) (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2))) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))) |
(fma.f64 #s(literal -2 binary64) (*.f64 b b) (*.f64 (*.f64 angle angle) (fma.f64 (*.f64 angle angle) (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale)) #s(literal -1/787320000 binary64))))) (*.f64 a a)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))))) (*.f64 a a)) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))))) (*.f64 a a)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))) (*.f64 a a)))))) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))))) (*.f64 a a)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))) (*.f64 a a))))))) |
(+ (* -2 (pow b 2)) (* (pow angle 2) (- (+ (* (pow angle 2) (- (+ (* (pow angle 2) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (+ (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (+ (* (pow b 2) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))))) (pow y-scale 2)))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- b a) 2)))) (pow y-scale 2))) (/ (* (pow (+ a b) 2) (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- b a) 2))) (pow y-scale 2))))))) (pow a 2)) (+ (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))))) (pow a 2))) (+ (/ (* (pow y-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (+ (* (pow b 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 2))))) (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))))) (pow a 2)) (+ (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))) (pow a 2))) (/ (* (pow y-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))) (pow a 2)))))) (pow a 2)) (/ (* (pow y-scale 2) (* (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))) (pow a 2)))))) (/ (* (pow y-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (+ (* (pow b 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 2))))) (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))))) (pow a 2))) (+ (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))) (pow a 2))) (/ (* (pow y-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))) (pow a 2))))) (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2))) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))) |
(fma.f64 #s(literal -2 binary64) (*.f64 b b) (*.f64 (*.f64 angle angle) (fma.f64 (*.f64 angle angle) (-.f64 (fma.f64 (*.f64 angle angle) (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))) (fma.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)))) (fma.f64 (*.f64 b b) (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 4 binary64) (fma.f64 #s(literal 1/102036672000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))))))) (*.f64 a a)) (+.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 y-scale y-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (*.f64 y-scale y-scale))))) (*.f64 a a)) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale)) #s(literal -1/787320000 binary64))))) (*.f64 a a)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))))) (*.f64 a a)) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))))) (*.f64 a a)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))) (*.f64 a a)))))) (*.f64 a a)))))) (*.f64 a a))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))))) (*.f64 a a)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))) (*.f64 a a)))))) (*.f64 a a)))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale)) #s(literal -1/787320000 binary64))))) (*.f64 a a))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))))) (*.f64 a a)) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))))) (*.f64 a a)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))) (*.f64 a a)))))) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))))) (*.f64 a a)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))) (*.f64 a a))))))) |
(/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) |
(/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) |
(/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) |
(/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) |
(/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) |
(/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) |
(/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) |
(/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) |
(/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) |
(/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) |
(/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) |
(/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) |
(/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) |
(/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) |
(/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) |
(/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) |
(/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) |
(/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) |
(/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) |
(/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) |
(/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) |
(/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) |
(/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) |
(/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) |
(/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) |
(/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) |
(/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) |
(/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) |
(/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) |
(/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) |
(/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) |
(/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) |
(/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) |
(/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) |
(/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) |
(/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) |
(/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) |
(/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) |
(/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) |
(/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) |
(/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) |
(/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) |
(+ (* 4 (/ (* a (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (pow b 2))) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) |
(fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 a (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64)))) (*.f64 b b)) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) |
(+ (* a (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (pow b 2))) (* a (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) |
(fma.f64 a (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64))) (*.f64 b b)) (*.f64 a (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) |
(+ (* a (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (pow b 2))) (* a (- (+ (* a (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (pow b 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) |
(fma.f64 a (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64))) (*.f64 b b)) (*.f64 a (-.f64 (fma.f64 a (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b #s(literal 0 binary64))) (*.f64 b b)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) |
(/ (* (pow a 2) (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) |
(/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) |
(* (pow a 2) (+ (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) a)) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) |
(*.f64 (*.f64 a a) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b #s(literal 0 binary64))) a) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) |
(* (pow a 2) (- (+ (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) a)) (+ (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4))))) |
(*.f64 (*.f64 a a) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b #s(literal 0 binary64))) a) (+.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) |
(* (pow a 2) (- (+ (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) a)) (+ (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (pow a 3))) (+ (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (* 4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (+ (* -2 b) (* 2 b)))) (* (pow a 3) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) |
(*.f64 (*.f64 a a) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b #s(literal 0 binary64))) a) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64))) (*.f64 a (*.f64 a a))) (+.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 b #s(literal 0 binary64)))) (*.f64 (*.f64 a (*.f64 a a)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) |
(/ (* (pow a 2) (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) |
(/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) |
(* (pow a 2) (+ (* -4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) a)) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) |
(*.f64 (*.f64 a a) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b #s(literal 0 binary64))) a) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) |
(* (pow a 2) (+ (* -1 (/ (+ (* -1 (/ (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (cos (* 1/180 (* angle (PI)))) 4))) a)) (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))))) a)) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) |
(*.f64 (*.f64 a a) (+.f64 (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64)))) (*.f64 y-scale y-scale))))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) a)) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b #s(literal 0 binary64))))) a)) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) |
(* (pow a 2) (+ (* -1 (/ (+ (* -1 (/ (- (+ (* -1 (/ (- (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* 4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (+ (* -2 b) (* 2 b)))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) a)) (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (cos (* 1/180 (* angle (PI)))) 4))) a)) (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))))) a)) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) |
(*.f64 (*.f64 a a) (+.f64 (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 b #s(literal 0 binary64)))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) a)) (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64)))) (*.f64 y-scale y-scale))))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) a)) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b #s(literal 0 binary64))))) a)) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) |
(+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) |
(*.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) |
(+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (+ (* 4 (/ (* b (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) |
(fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (+.f64 (/.f64 (*.f64 b (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) |
(+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* b (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (pow y-scale 2))) (* b (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))))))) |
(fma.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #s(literal 2 binary64) (*.f64 b (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64)))) (*.f64 y-scale y-scale)) (*.f64 b (fma.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64)))) (*.f64 y-scale y-scale)))))))) |
(+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* b (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (pow y-scale 2))) (* b (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (+ (* 4 (/ (* b (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))))) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2)))))))))) |
(fma.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #s(literal 2 binary64) (*.f64 b (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64)))) (*.f64 y-scale y-scale)) (*.f64 b (fma.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (+.f64 (/.f64 (*.f64 b (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a #s(literal 0 binary64))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64)))) (*.f64 y-scale y-scale))))))))) |
(* (pow b 4) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) |
(*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) |
(* (pow b 4) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (* b (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) |
(*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 b (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) |
(* (pow b 4) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (pow b 2))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow b 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (* b (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) |
(*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -2 binary64) (/.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale))) (*.f64 b b)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64)))) (*.f64 (*.f64 b b) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 b (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) |
(* (pow b 4) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (pow b 2))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow b 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (* b (pow y-scale 2)))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* (pow b 3) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -2 binary64) (/.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale))) (*.f64 b b)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64)))) (*.f64 (*.f64 b b) (*.f64 y-scale y-scale))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 b (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64)))) (*.f64 (*.f64 b (*.f64 b b)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))) |
(* (pow b 4) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) |
(*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) |
(* (pow b 4) (+ (* -4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (* b (pow y-scale 2)))) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) |
(*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 b (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)))) |
(* (pow b 4) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (* -1 (/ (+ (* -1 (/ (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2)))) b)) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (pow y-scale 2)))) b)) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) |
(*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (fma.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64)))) (*.f64 y-scale y-scale)))) b)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 y-scale y-scale)))) b)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) |
(* (pow b 4) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (* -1 (/ (+ (* -1 (/ (+ (* -4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* b (pow y-scale 2)))) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) b)) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (pow y-scale 2)))) b)) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) |
(*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64)))) (*.f64 b (*.f64 y-scale y-scale))) (fma.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64)))) (*.f64 y-scale y-scale))))) b)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 y-scale y-scale)))) b)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) |
(* -2 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) |
(*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (*.f64 y-scale y-scale))) |
(+ (* -2 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))))) |
(fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (*.f64 y-scale y-scale)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale)))))) |
(+ (* -2 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* (pow angle 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (+ (* (pow b 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 2))))) (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))))))))) |
(fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (*.f64 y-scale y-scale)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64)))))) (*.f64 y-scale y-scale))) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale)) #s(literal -1/787320000 binary64))))))))) |
(+ (* -2 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* (pow angle 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (+ (* (pow b 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow angle 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (+ (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (+ (* (pow b 2) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))))) (pow y-scale 2)))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- b a) 2)))) (pow y-scale 2))) (/ (* (pow (+ a b) 2) (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- b a) 2))) (pow y-scale 2)))))))))))))) |
(fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (*.f64 y-scale y-scale)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64)))))) (*.f64 y-scale y-scale))) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale)) #s(literal -1/787320000 binary64)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))) (fma.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)))) (fma.f64 (*.f64 b b) (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 4 binary64) (fma.f64 #s(literal 1/102036672000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale)))))))))))))) |
(+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) |
(fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) |
(+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) |
(fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) |
(+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) |
(fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) |
(+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) |
(fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) |
(+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) |
(fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) |
(+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) |
(fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) |
(+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) |
(fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) |
(+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) |
(fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) |
(/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (pow y-scale 2)) |
(/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))))) (*.f64 y-scale y-scale)) |
(/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (pow y-scale 2)) |
(/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))))) (*.f64 y-scale y-scale)) |
(/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (pow y-scale 2)) |
(/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))))) (*.f64 y-scale y-scale)) |
(/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (pow y-scale 2)) |
(/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))))) (*.f64 y-scale y-scale)) |
(/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (pow y-scale 2)) |
(/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))))) (*.f64 y-scale y-scale)) |
(/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (pow y-scale 2)) |
(/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))))) (*.f64 y-scale y-scale)) |
(/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (pow y-scale 2)) |
(/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))))) (*.f64 y-scale y-scale)) |
(/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (pow y-scale 2)) |
(/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))))) (*.f64 y-scale y-scale)) |
(/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (pow y-scale 2)) |
(/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))))) (*.f64 y-scale y-scale)) |
(/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (pow y-scale 2)) |
(/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))))) (*.f64 y-scale y-scale)) |
(/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (pow y-scale 2)) |
(/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))))) (*.f64 y-scale y-scale)) |
(/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (pow y-scale 2)) |
(/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))))) (*.f64 y-scale y-scale)) |
(+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) |
(*.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) |
(+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (+ (* 4 (/ (* a (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) |
(fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (+.f64 (/.f64 (*.f64 a (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) |
(+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* a (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (pow y-scale 2))) (* a (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))))))) |
(fma.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #s(literal 2 binary64) (*.f64 a (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64)))) (*.f64 y-scale y-scale)) (*.f64 a (fma.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64)))) (*.f64 y-scale y-scale)))))))) |
(+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* a (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (pow y-scale 2))) (* a (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (+ (* 4 (/ (* a (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))))) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2)))))))))) |
(fma.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #s(literal 2 binary64) (*.f64 a (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64)))) (*.f64 y-scale y-scale)) (*.f64 a (fma.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (+.f64 (/.f64 (*.f64 a (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b #s(literal 0 binary64))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64)))) (*.f64 y-scale y-scale))))))))) |
(* (pow a 4) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) |
(*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) |
(* (pow a 4) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (* a (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) |
(*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b #s(literal 0 binary64)))) (*.f64 a (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) |
(* (pow a 4) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (pow a 2))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow a 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (* a (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) |
(*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -2 binary64) (/.f64 (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale))) (*.f64 a a)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64)))) (*.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b #s(literal 0 binary64)))) (*.f64 a (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) |
(* (pow a 4) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (pow a 2))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow a 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (* a (pow y-scale 2)))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* (pow a 3) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -2 binary64) (/.f64 (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale))) (*.f64 a a)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64)))) (*.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b #s(literal 0 binary64)))) (*.f64 a (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64)))) (*.f64 (*.f64 a (*.f64 a a)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))) |
(* (pow a 4) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) |
(*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) |
(* (pow a 4) (+ (* -4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (* a (pow y-scale 2)))) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) |
(*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b #s(literal 0 binary64)))) (*.f64 a (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)))) |
(* (pow a 4) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (* -1 (/ (+ (* -1 (/ (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2)))) a)) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (pow y-scale 2)))) a)) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) |
(*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (fma.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64)))) (*.f64 y-scale y-scale)))) a)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b #s(literal 0 binary64)))) (*.f64 y-scale y-scale)))) a)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) |
(* (pow a 4) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (* -1 (/ (+ (* -1 (/ (+ (* -4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* a (pow y-scale 2)))) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) a)) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (pow y-scale 2)))) a)) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) |
(*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64)))) (*.f64 a (*.f64 y-scale y-scale))) (fma.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64)))) (*.f64 y-scale y-scale))))) a)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b #s(literal 0 binary64)))) (*.f64 y-scale y-scale)))) a))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) |
| 1× | batch-egg-rewrite |
| 4 958× | lower-*.f32 |
| 4 844× | lower-*.f64 |
| 3 976× | lower-/.f32 |
| 3 932× | lower-/.f64 |
| 2 782× | lower-fma.f32 |
Useful iterations: 0 (0.0ms)
| Iter | Nodes | Cost |
|---|---|---|
| 0 | 192 | 2595 |
| 0 | 334 | 2545 |
| 1 | 1277 | 2291 |
| 0 | 8978 | 2226 |
| 1× | iter limit |
| 1× | node limit |
| 1× | iter limit |
| Inputs |
|---|
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) |
(*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) |
(*.f64 #s(literal 1/4 binary64) b) |
(*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))) |
(pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)) |
(/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) |
(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) |
(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) |
(/.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))) (*.f64 #s(literal 8 binary64) (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale))))))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))) |
(*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) |
(/.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (*.f64 a b)) (*.f64 #s(literal 4 binary64) (*.f64 a b)))) |
(*.f64 (neg.f64 (*.f64 a b)) (*.f64 #s(literal 4 binary64) (*.f64 a b))) |
(/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))))))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))))))))) |
(*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))))))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale)))))))) |
(fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))))))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))))))) |
(sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a))))) |
(cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
(*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) |
(sqrt.f64 #s(literal 2 binary64)) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) |
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))) |
(cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) |
(*.f64 (/.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (*.f64 a b)) (*.f64 #s(literal 4 binary64) (*.f64 a b)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))) (*.f64 #s(literal 8 binary64) (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale))))))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))) |
(/.f64 (*.f64 (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))) (*.f64 #s(literal 8 binary64) (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) |
(sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))) |
(cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))) |
(/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale)))) |
(fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale))) |
| Outputs |
|---|
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))))))) |
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a)))))) |
(*.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))))) (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (sqrt.f64 #s(literal 8 binary64)))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) |
(*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) #s(literal 1/4 binary64)) |
(*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (sqrt.f64 #s(literal 8 binary64))) |
(*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) |
(*.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 b #s(literal 1/4 binary64)) (*.f64 y-scale #s(literal 4 binary64)))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale #s(literal 4 binary64)))) |
(*.f64 (*.f64 b #s(literal 1/4 binary64)) (*.f64 y-scale #s(literal 4 binary64))) |
(*.f64 (*.f64 y-scale #s(literal 4 binary64)) (*.f64 b #s(literal 1/4 binary64))) |
(*.f64 (*.f64 (*.f64 b #s(literal 1/4 binary64)) (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 8 binary64))) |
(*.f64 b #s(literal 1/4 binary64)) |
(*.f64 #s(literal 1/4 binary64) b) |
(*.f64 y-scale #s(literal 4 binary64)) |
(*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64)))) |
(*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))) |
(exp.f64 (*.f64 (log.f64 (*.f64 x-scale y-scale)) #s(literal 2 binary64))) |
(/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) #s(literal 1 binary64)) |
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))) |
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) #s(literal 1 binary64))) |
(/.f64 #s(literal -1 binary64) (/.f64 #s(literal -1 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))) |
(/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale (neg.f64 y-scale))) #s(literal -1 binary64)) |
(pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)) |
(pow.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) #s(literal 1 binary64)) |
(pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) #s(literal -1 binary64)) |
(pow.f64 (exp.f64 (log.f64 (*.f64 x-scale y-scale))) #s(literal 2 binary64)) |
(*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) |
(*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)) |
(*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) |
(*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) |
(*.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) x-scale) |
(*.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) #s(literal 1 binary64)) |
(*.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) |
(*.f64 (exp.f64 (log.f64 (*.f64 x-scale y-scale))) (exp.f64 (log.f64 (*.f64 x-scale y-scale)))) |
(-.f64 #s(literal 0 binary64) (*.f64 (sqrt.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 b (neg.f64 a)) (*.f64 #s(literal 4 binary64) (*.f64 b a))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (neg.f64 (*.f64 (*.f64 (*.f64 b a) b) a)))) (+.f64 (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 (*.f64 b (neg.f64 a)) (*.f64 #s(literal 4 binary64) (*.f64 b a)))))) |
(-.f64 (/.f64 #s(literal 0 binary64) (/.f64 (*.f64 (*.f64 b (neg.f64 a)) (*.f64 #s(literal 4 binary64) (*.f64 b a))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))) (*.f64 (sqrt.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 b (neg.f64 a)) (*.f64 #s(literal 4 binary64) (*.f64 b a))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (neg.f64 (*.f64 (*.f64 (*.f64 b a) b) a)))) (+.f64 (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 (*.f64 b (neg.f64 a)) (*.f64 #s(literal 4 binary64) (*.f64 b a)))))) |
(neg.f64 (*.f64 (sqrt.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 b (neg.f64 a)) (*.f64 #s(literal 4 binary64) (*.f64 b a))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (neg.f64 (*.f64 (*.f64 (*.f64 b a) b) a)))) (+.f64 (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 (*.f64 b (neg.f64 a)) (*.f64 #s(literal 4 binary64) (*.f64 b a)))))) |
(/.f64 (sqrt.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 b (neg.f64 a)) (*.f64 #s(literal 4 binary64) (*.f64 b a))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (neg.f64 (*.f64 (*.f64 (*.f64 b a) b) a)))) (+.f64 (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (/.f64 (*.f64 (*.f64 b a) (*.f64 #s(literal 4 binary64) (*.f64 b a))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))) |
(/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 b (neg.f64 a)) (*.f64 #s(literal 4 binary64) (*.f64 b a))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (neg.f64 (*.f64 (*.f64 (*.f64 b a) b) a)))) (+.f64 (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (/.f64 (*.f64 (*.f64 b (neg.f64 a)) (*.f64 #s(literal 4 binary64) (*.f64 b a))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))) |
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 (*.f64 b a) (*.f64 #s(literal 4 binary64) (*.f64 b a))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (sqrt.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 b (neg.f64 a)) (*.f64 #s(literal 4 binary64) (*.f64 b a))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (neg.f64 (*.f64 (*.f64 (*.f64 b a) b) a)))) (+.f64 (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))))) |
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (/.f64 (*.f64 (*.f64 b a) (*.f64 #s(literal 4 binary64) (*.f64 b a))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (sqrt.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 b (neg.f64 a)) (*.f64 #s(literal 4 binary64) (*.f64 b a))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (neg.f64 (*.f64 (*.f64 (*.f64 b a) b) a)))) (+.f64 (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) #s(literal 1 binary64))) |
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 (*.f64 (*.f64 b a) (*.f64 #s(literal 4 binary64) (*.f64 b a))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (sqrt.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 b (neg.f64 a)) (*.f64 #s(literal 4 binary64) (*.f64 b a))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (neg.f64 (*.f64 (*.f64 (*.f64 b a) b) a)))) (+.f64 (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))))) |
(pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 b a) (*.f64 #s(literal 4 binary64) (*.f64 b a))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (sqrt.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 b (neg.f64 a)) (*.f64 #s(literal 4 binary64) (*.f64 b a))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (neg.f64 (*.f64 (*.f64 (*.f64 b a) b) a)))) (+.f64 (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) #s(literal -1 binary64)) |
(*.f64 (sqrt.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 b (neg.f64 a)) (*.f64 #s(literal 4 binary64) (*.f64 b a))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (neg.f64 (*.f64 (*.f64 (*.f64 b a) b) a)))) (+.f64 (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 b a) (*.f64 #s(literal 4 binary64) (*.f64 b a))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))) |
(*.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 b (neg.f64 a)) (*.f64 #s(literal 4 binary64) (*.f64 b a))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (neg.f64 (*.f64 (*.f64 (*.f64 b a) b) a)))) (+.f64 (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 (*.f64 b (neg.f64 a)) (*.f64 #s(literal 4 binary64) (*.f64 b a))))) |
(*.f64 #s(literal 1 binary64) (*.f64 (/.f64 (sqrt.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 b (neg.f64 a)) (*.f64 #s(literal 4 binary64) (*.f64 b a))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (neg.f64 (*.f64 (*.f64 (*.f64 b a) b) a)))) (+.f64 (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 b a) (*.f64 #s(literal 4 binary64) (*.f64 b a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))) |
(*.f64 #s(literal -1 binary64) (*.f64 (sqrt.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 b (neg.f64 a)) (*.f64 #s(literal 4 binary64) (*.f64 b a))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (neg.f64 (*.f64 (*.f64 (*.f64 b a) b) a)))) (+.f64 (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 (*.f64 b (neg.f64 a)) (*.f64 #s(literal 4 binary64) (*.f64 b a)))))) |
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 b a) (*.f64 #s(literal 4 binary64) (*.f64 b a)))) (/.f64 (sqrt.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 b (neg.f64 a)) (*.f64 #s(literal 4 binary64) (*.f64 b a))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (neg.f64 (*.f64 (*.f64 (*.f64 b a) b) a)))) (+.f64 (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))) |
(*.f64 (/.f64 (sqrt.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 b (neg.f64 a)) (*.f64 #s(literal 4 binary64) (*.f64 b a))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (neg.f64 (*.f64 (*.f64 (*.f64 b a) b) a)))) (+.f64 (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 b a) (*.f64 #s(literal 4 binary64) (*.f64 b a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) |
(*.f64 #s(literal -1/4 binary64) (/.f64 (sqrt.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 b (neg.f64 a)) (*.f64 #s(literal 4 binary64) (*.f64 b a))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (neg.f64 (*.f64 (*.f64 (*.f64 b a) b) a)))) (+.f64 (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 b a) b) a)) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))) |
(neg.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale (neg.f64 x-scale)))) |
(neg.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) x-scale) (neg.f64 x-scale))) |
(neg.f64 (/.f64 (neg.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a)))) (*.f64 x-scale x-scale))) |
(neg.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (neg.f64 x-scale)) x-scale)) |
(/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) |
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale x-scale) (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))))) |
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 x-scale (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a)))) x-scale)) |
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 x-scale x-scale) (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a)))) #s(literal 1 binary64))) |
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 x-scale x-scale) (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a)))))) |
(/.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (neg.f64 x-scale)) (neg.f64 x-scale)) |
(/.f64 (neg.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a)))) (*.f64 x-scale (neg.f64 x-scale))) |
(/.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) x-scale) x-scale) |
(/.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) x-scale) (neg.f64 (neg.f64 x-scale))) |
(/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) #s(literal 1 binary64)) (*.f64 x-scale x-scale)) |
(/.f64 (*.f64 (neg.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a)))) #s(literal 1 binary64)) (*.f64 x-scale (neg.f64 x-scale))) |
(/.f64 (*.f64 (+.f64 (pow.f64 (*.f64 b (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 6 binary64)) (pow.f64 (*.f64 a (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 6 binary64))) #s(literal 1 binary64)) (*.f64 (+.f64 (pow.f64 (*.f64 b (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 4 binary64)) (-.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 4 binary64)) (*.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))))) (*.f64 x-scale x-scale))) |
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 b (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 (*.f64 a (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 4 binary64))) #s(literal 1 binary64)) (*.f64 (-.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) |
(/.f64 (neg.f64 (neg.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))))) (neg.f64 (*.f64 x-scale (neg.f64 x-scale)))) |
(pow.f64 (/.f64 (*.f64 x-scale x-scale) (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a)))) #s(literal -1 binary64)) |
(*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) |
(*.f64 #s(literal 1 binary64) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) |
(*.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (neg.f64 x-scale)) (/.f64 #s(literal 1 binary64) (neg.f64 x-scale))) |
(*.f64 (neg.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a)))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (neg.f64 x-scale)))) |
(*.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) x-scale) (/.f64 #s(literal 1 binary64) x-scale)) |
(neg.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (neg.f64 (*.f64 y-scale y-scale)))) |
(/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale)) |
(/.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) y-scale) y-scale) |
(/.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) y-scale) (neg.f64 (neg.f64 y-scale))) |
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 y-scale y-scale) (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))))) |
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 y-scale (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a)))) y-scale)) |
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 y-scale y-scale) (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a)))) #s(literal 1 binary64))) |
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 y-scale y-scale) (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a)))))) |
(/.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (neg.f64 y-scale)) (neg.f64 y-scale)) |
(/.f64 (neg.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a)))) (neg.f64 (*.f64 y-scale y-scale))) |
(/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) #s(literal 1 binary64)) (*.f64 y-scale y-scale)) |
(/.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a)))) #s(literal 1 binary64)) (neg.f64 (*.f64 y-scale y-scale))) |
(/.f64 (*.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 6 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 6 binary64))) #s(literal 1 binary64)) (*.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 4 binary64)) (-.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 4 binary64)) (*.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a)) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))))) (*.f64 y-scale y-scale))) |
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 4 binary64))) #s(literal 1 binary64)) (*.f64 (-.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a)) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (*.f64 y-scale y-scale))) |
(/.f64 (neg.f64 (neg.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))))) (neg.f64 (neg.f64 (*.f64 y-scale y-scale)))) |
(pow.f64 (/.f64 (*.f64 y-scale y-scale) (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a)))) #s(literal -1 binary64)) |
(*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))) |
(*.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) y-scale) (/.f64 #s(literal 1 binary64) y-scale)) |
(*.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale))) |
(*.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (neg.f64 y-scale)) (/.f64 #s(literal 1 binary64) (neg.f64 y-scale))) |
(*.f64 (neg.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a)))) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 y-scale y-scale)))) |
(neg.f64 (/.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 b a) b) a)) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (+.f64 (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale y-scale))))))) (/.f64 #s(literal -1 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))) |
(neg.f64 (/.f64 (neg.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 b a) b) a)) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (+.f64 (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale y-scale)))))))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))) |
(/.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 b a) b) a)) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (+.f64 (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale y-scale))))))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))) |
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 b a) b) a)) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (+.f64 (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale y-scale))))))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))) |
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 b a) b) a)) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (+.f64 (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale y-scale))))))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))) #s(literal 1 binary64))) |
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 b a) b) a)) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (+.f64 (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale y-scale))))))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))))) |
(/.f64 (neg.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 b a) b) a)) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (+.f64 (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale y-scale)))))))) (/.f64 #s(literal -1 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))) |
(/.f64 (neg.f64 (neg.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 b a) b) a)) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (+.f64 (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale y-scale))))))))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))) |
(pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 b a) b) a)) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (+.f64 (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale y-scale))))))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))) #s(literal -1 binary64)) |
(*.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 b a) b) a)) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (+.f64 (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale y-scale))))))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) |
(*.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 b a) b) a)) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (+.f64 (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale y-scale))))))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))) |
(*.f64 (neg.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 b a) b) a)) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (+.f64 (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale y-scale)))))))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))) |
(*.f64 (/.f64 (sqrt.f64 (/.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 b a) b) a)) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))) #s(literal 1 binary64)) (/.f64 (sqrt.f64 (+.f64 (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale y-scale)))))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))) |
(*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
(*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) #s(literal 2 binary64)) |
(*.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (PI.f64))) #s(literal 1/180 binary64)) |
(neg.f64 (/.f64 #s(literal -1 binary64) (*.f64 (*.f64 b a) (*.f64 #s(literal 4 binary64) (*.f64 b a))))) |
(/.f64 #s(literal 1 binary64) (*.f64 (*.f64 b a) (*.f64 #s(literal 4 binary64) (*.f64 b a)))) |
(/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 b (neg.f64 a)) (*.f64 #s(literal 4 binary64) (*.f64 b a))) #s(literal -1 binary64))) |
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b (neg.f64 a)) (*.f64 #s(literal 4 binary64) (*.f64 b a))) #s(literal -1 binary64)) #s(literal 1 binary64))) |
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 b a)) (neg.f64 (/.f64 #s(literal -1 binary64) (*.f64 b a))))) |
(/.f64 #s(literal -1 binary64) (*.f64 (*.f64 b (neg.f64 a)) (*.f64 #s(literal 4 binary64) (*.f64 b a)))) |
(/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 (*.f64 (*.f64 b (neg.f64 a)) (*.f64 #s(literal 4 binary64) (*.f64 b a))) #s(literal -1 binary64)))) |
(/.f64 (neg.f64 (/.f64 #s(literal -1 binary64) (*.f64 b a))) (*.f64 #s(literal 4 binary64) (*.f64 b a))) |
(/.f64 (neg.f64 (neg.f64 (/.f64 #s(literal -1 binary64) (*.f64 b a)))) (neg.f64 (*.f64 #s(literal 4 binary64) (*.f64 b a)))) |
(pow.f64 (*.f64 (*.f64 b a) (*.f64 #s(literal 4 binary64) (*.f64 b a))) #s(literal -1 binary64)) |
(pow.f64 (*.f64 (*.f64 (*.f64 b (neg.f64 a)) (*.f64 #s(literal 4 binary64) (*.f64 b a))) #s(literal -1 binary64)) #s(literal -1 binary64)) |
(*.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 b a) (*.f64 #s(literal 4 binary64) (*.f64 b a))))) |
(*.f64 #s(literal -1 binary64) (/.f64 #s(literal -1 binary64) (*.f64 (*.f64 b a) (*.f64 #s(literal 4 binary64) (*.f64 b a))))) |
(*.f64 (neg.f64 (/.f64 #s(literal -1 binary64) (*.f64 b a))) (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (*.f64 b a)))) |
(-.f64 #s(literal 0 binary64) (*.f64 (*.f64 b a) (*.f64 #s(literal 4 binary64) (*.f64 b a)))) |
(neg.f64 (*.f64 (*.f64 b a) (*.f64 #s(literal 4 binary64) (*.f64 b a)))) |
(neg.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 b a)) (*.f64 b a))) |
(*.f64 #s(literal 4 binary64) (neg.f64 (*.f64 (*.f64 (*.f64 b a) b) a))) |
(*.f64 (*.f64 b a) (neg.f64 (*.f64 #s(literal 4 binary64) (*.f64 b a)))) |
(*.f64 (*.f64 b (neg.f64 a)) (*.f64 #s(literal 4 binary64) (*.f64 b a))) |
(*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 b a) b) a)) #s(literal 4 binary64)) |
(*.f64 #s(literal -1 binary64) (*.f64 (*.f64 b a) (*.f64 #s(literal 4 binary64) (*.f64 b a)))) |
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 b a)) (*.f64 b (neg.f64 a))) |
(*.f64 (neg.f64 (*.f64 #s(literal 4 binary64) (*.f64 b a))) (*.f64 b a)) |
(exp.f64 (*.f64 (log.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) #s(literal -1 binary64))) |
(neg.f64 (/.f64 #s(literal -1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) |
(/.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) |
(/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) |
(/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) #s(literal -2 binary64)))) |
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64))) |
(/.f64 #s(literal -1 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) #s(literal -2 binary64))) |
(/.f64 #s(literal -1/2 binary64) (neg.f64 (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) |
(pow.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) #s(literal -1 binary64)) |
(*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) |
(*.f64 #s(literal 1 binary64) (/.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) |
(*.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) #s(literal -2 binary64)))) |
(*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) |
(*.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -2 binary64) (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))))) |
(+.f64 (*.f64 x-scale (/.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -2 binary64) (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (*.f64 x-scale x-scale))) (*.f64 x-scale (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))))) |
(+.f64 (*.f64 x-scale (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (*.f64 x-scale (/.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -2 binary64) (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (*.f64 x-scale x-scale)))) |
(+.f64 (*.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -2 binary64) (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (*.f64 x-scale x-scale)) x-scale) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) x-scale)) |
(fma.f64 x-scale (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (*.f64 x-scale (/.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -2 binary64) (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (*.f64 x-scale x-scale)))) |
(fma.f64 x-scale (/.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -2 binary64) (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (*.f64 x-scale x-scale)) (*.f64 x-scale (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))))) |
(fma.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -2 binary64) (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (*.f64 x-scale x-scale)) x-scale (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) x-scale)) |
(/.f64 (+.f64 (pow.f64 (*.f64 x-scale (/.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -2 binary64) (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (*.f64 x-scale x-scale))) #s(literal 3 binary64)) (pow.f64 (*.f64 x-scale (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) #s(literal 3 binary64))) (fma.f64 (*.f64 x-scale (/.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -2 binary64) (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (*.f64 x-scale x-scale))) (*.f64 x-scale (/.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -2 binary64) (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (*.f64 x-scale x-scale))) (-.f64 (*.f64 (*.f64 x-scale (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (*.f64 x-scale (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))))) (*.f64 (*.f64 x-scale (/.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -2 binary64) (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (*.f64 x-scale x-scale))) (*.f64 x-scale (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))))))) |
(/.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -2 binary64) (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (*.f64 x-scale x-scale)) x-scale) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) x-scale) #s(literal 3 binary64))) (fma.f64 (*.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -2 binary64) (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (*.f64 x-scale x-scale)) x-scale) (*.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -2 binary64) (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (*.f64 x-scale x-scale)) x-scale) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) x-scale) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) x-scale)) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -2 binary64) (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (*.f64 x-scale x-scale)) x-scale) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) x-scale))))) |
(/.f64 (-.f64 (*.f64 (*.f64 x-scale (/.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -2 binary64) (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (*.f64 x-scale x-scale))) (*.f64 x-scale (/.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -2 binary64) (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 x-scale (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (*.f64 x-scale (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))))) (-.f64 (*.f64 x-scale (/.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -2 binary64) (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (*.f64 x-scale x-scale))) (*.f64 x-scale (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))))) |
(/.f64 (-.f64 (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -2 binary64) (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (*.f64 x-scale x-scale)) x-scale) (*.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -2 binary64) (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (*.f64 x-scale x-scale)) x-scale)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) x-scale) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) x-scale))) (-.f64 (*.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -2 binary64) (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (*.f64 x-scale x-scale)) x-scale) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) x-scale))) |
(*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -2 binary64) (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))))) |
(*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -2 binary64) (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) x-scale) |
(+.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (/.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -2 binary64) (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (*.f64 x-scale x-scale))) |
(+.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -2 binary64) (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) |
(-.f64 (/.f64 (pow.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -2 binary64) (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -2 binary64) (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))))) (/.f64 (pow.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -2 binary64) (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (/.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -2 binary64) (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (*.f64 x-scale x-scale))) |
(fma.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (/.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -2 binary64) (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (*.f64 x-scale x-scale))) |
(fma.f64 #s(literal 1/8 binary64) (/.f64 (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -2 binary64) (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) |
(fma.f64 (/.f64 (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -2 binary64) (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (*.f64 x-scale x-scale)) #s(literal 1/8 binary64) (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) |
(fma.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (sqrt.f64 #s(literal 8 binary64))) (/.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -2 binary64) (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (*.f64 x-scale x-scale))) |
(fma.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -2 binary64) (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) |
(fma.f64 (/.f64 #s(literal 1/8 binary64) x-scale) (/.f64 (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -2 binary64) (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) x-scale) (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) |
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (pow.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -2 binary64) (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -2 binary64) (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))))) (fma.f64 #s(literal 1/512 binary64) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -2 binary64) (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (*.f64 x-scale x-scale)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) #s(literal 3 binary64))))) |
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -2 binary64) (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))))) (-.f64 (pow.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -2 binary64) (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) #s(literal 2 binary64))))) |
(/.f64 (fma.f64 #s(literal 1/512 binary64) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -2 binary64) (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (*.f64 x-scale x-scale)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) #s(literal 3 binary64))) (+.f64 (pow.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -2 binary64) (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -2 binary64) (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))))))) |
(/.f64 (-.f64 (pow.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -2 binary64) (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -2 binary64) (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))))) |
(/.f64 (neg.f64 (fma.f64 #s(literal 1/512 binary64) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -2 binary64) (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (*.f64 x-scale x-scale)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -2 binary64) (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -2 binary64) (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))))))) |
(/.f64 (neg.f64 (-.f64 (pow.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -2 binary64) (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) #s(literal 2 binary64)))) (neg.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -2 binary64) (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))))))) |
(/.f64 (fma.f64 #s(literal 1/64 binary64) (pow.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -2 binary64) (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (*.f64 x-scale x-scale)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) #s(literal 2 binary64)) (-.f64 (pow.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -2 binary64) (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (/.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -2 binary64) (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (*.f64 x-scale x-scale)))))) |
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -2 binary64) (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (/.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -2 binary64) (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (*.f64 x-scale x-scale)))) |
(*.f64 (fma.f64 #s(literal 1/512 binary64) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -2 binary64) (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (*.f64 x-scale x-scale)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -2 binary64) (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -2 binary64) (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))))))) |
(*.f64 (-.f64 (pow.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -2 binary64) (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/8 binary64) (/.f64 (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -2 binary64) (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))))))) |
(exp.f64 (*.f64 (log.f64 (*.f64 #s(literal 2 binary64) (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))))) #s(literal 1/2 binary64))) |
(sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))))) |
(pow.f64 (*.f64 #s(literal 2 binary64) (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a)))) #s(literal 1/2 binary64)) |
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))))) |
(*.f64 (sqrt.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a)))) (sqrt.f64 #s(literal 2 binary64))) |
(*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a)))) #s(literal 1/4 binary64)) (pow.f64 (*.f64 #s(literal 2 binary64) (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a)))) #s(literal 1/4 binary64))) |
(exp.f64 (*.f64 (log.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1 binary64))) |
(cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
(pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 1 binary64)) |
(*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64))) |
(exp.f64 (*.f64 (log.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1 binary64))) |
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
(pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 1 binary64)) |
(*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64))) |
(*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) |
(*.f64 (sqrt.f64 #s(literal 2 binary64)) y-scale) |
(exp.f64 (*.f64 (log.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) |
(sqrt.f64 #s(literal 2 binary64)) |
(pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)) |
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) |
(neg.f64 (/.f64 (*.f64 (*.f64 b a) (*.f64 #s(literal 4 binary64) (*.f64 b a))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))) |
(/.f64 (*.f64 (*.f64 b (neg.f64 a)) (*.f64 #s(literal 4 binary64) (*.f64 b a))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) |
(/.f64 (*.f64 (*.f64 b (neg.f64 a)) (*.f64 #s(literal 4 binary64) (*.f64 b a))) (neg.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale (neg.f64 y-scale))))) |
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 (*.f64 b (neg.f64 a)) (*.f64 #s(literal 4 binary64) (*.f64 b a))))) |
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 (*.f64 b (neg.f64 a)) (*.f64 #s(literal 4 binary64) (*.f64 b a)))) #s(literal 1 binary64))) |
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 (*.f64 b (neg.f64 a)) (*.f64 #s(literal 4 binary64) (*.f64 b a)))))) |
(/.f64 (*.f64 (*.f64 b a) (*.f64 #s(literal 4 binary64) (*.f64 b a))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale (neg.f64 y-scale)))) |
(pow.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 (*.f64 b (neg.f64 a)) (*.f64 #s(literal 4 binary64) (*.f64 b a)))) #s(literal -1 binary64)) |
(*.f64 #s(literal 4 binary64) (/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 b a) b) a)) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))) |
(*.f64 (*.f64 (*.f64 b (neg.f64 a)) (*.f64 #s(literal 4 binary64) (*.f64 b a))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))) |
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 b (neg.f64 a)) (*.f64 #s(literal 4 binary64) (*.f64 b a))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))) |
(*.f64 (*.f64 (*.f64 b a) (*.f64 #s(literal 4 binary64) (*.f64 b a))) (/.f64 #s(literal -1 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))) |
(*.f64 (/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 b a) b) a)) x-scale) (/.f64 #s(literal 4 binary64) (*.f64 y-scale (*.f64 x-scale y-scale)))) |
(*.f64 (/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 b a) b) a)) (*.f64 x-scale y-scale)) (/.f64 #s(literal 4 binary64) (*.f64 x-scale y-scale))) |
(*.f64 (/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 b a) b) a)) (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 #s(literal 4 binary64) x-scale)) |
(*.f64 (/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 b a) b) a)) (*.f64 x-scale x-scale)) (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale))) |
(*.f64 (/.f64 #s(literal 4 binary64) x-scale) (/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 b a) b) a)) (*.f64 y-scale (*.f64 x-scale y-scale)))) |
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 x-scale y-scale)) (/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 b a) b) a)) (*.f64 x-scale y-scale))) |
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 x-scale x-scale)) (/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 b a) b) a)) (*.f64 y-scale y-scale))) |
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 b a) b) a)) x-scale)) |
(*.f64 (/.f64 (*.f64 b (neg.f64 a)) x-scale) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 b a)) (*.f64 y-scale (*.f64 x-scale y-scale)))) |
(*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 b a)) (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 b (neg.f64 a)) x-scale)) |
(*.f64 (/.f64 (*.f64 b (neg.f64 a)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 b a)) (*.f64 x-scale y-scale))) |
(*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 b a)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b (neg.f64 a)) (*.f64 x-scale y-scale))) |
(*.f64 (/.f64 (*.f64 b (neg.f64 a)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 b a)) (*.f64 y-scale y-scale))) |
(*.f64 (/.f64 (*.f64 b (neg.f64 a)) (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 b a)) x-scale)) |
(*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 b a)) x-scale) (/.f64 (*.f64 b (neg.f64 a)) (*.f64 y-scale (*.f64 x-scale y-scale)))) |
(*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 b a)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b (neg.f64 a)) (*.f64 y-scale y-scale))) |
(*.f64 (/.f64 (neg.f64 (*.f64 #s(literal 4 binary64) (*.f64 b a))) x-scale) (/.f64 (*.f64 b a) (*.f64 y-scale (*.f64 x-scale y-scale)))) |
(*.f64 (/.f64 (neg.f64 (*.f64 #s(literal 4 binary64) (*.f64 b a))) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b a) (*.f64 x-scale y-scale))) |
(*.f64 (/.f64 (neg.f64 (*.f64 #s(literal 4 binary64) (*.f64 b a))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b a) (*.f64 y-scale y-scale))) |
(*.f64 (/.f64 (neg.f64 (*.f64 #s(literal 4 binary64) (*.f64 b a))) (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 b a) x-scale)) |
(exp.f64 (*.f64 (log.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1 binary64))) |
(cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
(pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 1 binary64)) |
(*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64))) |
(neg.f64 (/.f64 (neg.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 b a) b) a)) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (+.f64 (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale y-scale))))))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))) (*.f64 (*.f64 b a) (*.f64 #s(literal 4 binary64) (*.f64 b a))))) |
(/.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 b a) b) a)) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (+.f64 (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale y-scale))))))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (*.f64 (*.f64 b a) (*.f64 #s(literal 4 binary64) (*.f64 b a))))) |
(/.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 b a) b) a)) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (+.f64 (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale y-scale))))))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (*.f64 (*.f64 (*.f64 b (neg.f64 a)) (*.f64 #s(literal 4 binary64) (*.f64 b a))) #s(literal -1 binary64)))) |
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 b a) b) a)) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (+.f64 (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale y-scale))))))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))) (*.f64 (*.f64 b a) (*.f64 #s(literal 4 binary64) (*.f64 b a))))) |
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 b a) b) a)) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (+.f64 (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale y-scale))))))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))) (*.f64 (*.f64 (*.f64 b (neg.f64 a)) (*.f64 #s(literal 4 binary64) (*.f64 b a))) #s(literal -1 binary64)))) |
(/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 b a) (*.f64 #s(literal 4 binary64) (*.f64 b a))) (/.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 b a) b) a)) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (+.f64 (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale y-scale))))))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))))) |
(/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 b (neg.f64 a)) (*.f64 #s(literal 4 binary64) (*.f64 b a))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 b a) b) a)) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (+.f64 (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale y-scale))))))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))))) |
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 (*.f64 b (neg.f64 a)) (*.f64 #s(literal 4 binary64) (*.f64 b a))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (neg.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 b a) b) a)) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (+.f64 (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale y-scale)))))))))) |
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 b a) (*.f64 #s(literal 4 binary64) (*.f64 b a)))) (sqrt.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 b a) b) a)) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (+.f64 (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale y-scale)))))))))) |
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 b (neg.f64 a)) (*.f64 #s(literal 4 binary64) (*.f64 b a))) (neg.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 b a) b) a)) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (+.f64 (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale y-scale))))))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))))) |
(/.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 b a) b) a)) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (+.f64 (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale y-scale))))))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (*.f64 (*.f64 b a) (*.f64 #s(literal 4 binary64) (*.f64 b a)))) |
(/.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 b a) b) a)) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (+.f64 (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale y-scale))))))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (*.f64 (*.f64 (*.f64 b (neg.f64 a)) (*.f64 #s(literal 4 binary64) (*.f64 b a))) #s(literal -1 binary64))) |
(/.f64 #s(literal -1 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 b a) b) a)) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (+.f64 (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale y-scale))))))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))) (*.f64 (*.f64 b (neg.f64 a)) (*.f64 #s(literal 4 binary64) (*.f64 b a))))) |
(/.f64 #s(literal -1 binary64) (*.f64 (*.f64 (*.f64 b (neg.f64 a)) (*.f64 #s(literal 4 binary64) (*.f64 b a))) (/.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 b a) b) a)) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (+.f64 (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale y-scale))))))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))))) |
(/.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 b a) (*.f64 #s(literal 4 binary64) (*.f64 b a)))) (/.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 b a) b) a)) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (+.f64 (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale y-scale))))))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))) |
(/.f64 (neg.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 b a) b) a)) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (+.f64 (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale y-scale)))))))) (/.f64 (*.f64 (*.f64 b (neg.f64 a)) (*.f64 #s(literal 4 binary64) (*.f64 b a))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))) |
(/.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 b a) (*.f64 #s(literal 4 binary64) (*.f64 b a)))) (sqrt.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 b a) b) a)) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (+.f64 (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale y-scale)))))))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))) |
(/.f64 (neg.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 b a) b) a)) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (+.f64 (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale y-scale))))))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))) (*.f64 (*.f64 b (neg.f64 a)) (*.f64 #s(literal 4 binary64) (*.f64 b a)))) |
(/.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 b a) b) a)) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (+.f64 (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale y-scale))))))) #s(literal -1 binary64)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (*.f64 (*.f64 b (neg.f64 a)) (*.f64 #s(literal 4 binary64) (*.f64 b a))))) |
(/.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 b a) b) a)) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (+.f64 (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale y-scale))))))) (neg.f64 (/.f64 #s(literal -1 binary64) (*.f64 b a)))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (*.f64 #s(literal 4 binary64) (*.f64 b a)))) |
(/.f64 (*.f64 #s(literal 1 binary64) (neg.f64 (/.f64 #s(literal -1 binary64) (*.f64 b a)))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 b a) b) a)) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (+.f64 (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale y-scale))))))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))) (*.f64 #s(literal 4 binary64) (*.f64 b a)))) |
(/.f64 (*.f64 (neg.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 b a) b) a)) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (+.f64 (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale y-scale)))))))) #s(literal 1 binary64)) (*.f64 (/.f64 #s(literal -1 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (*.f64 (*.f64 b a) (*.f64 #s(literal 4 binary64) (*.f64 b a))))) |
(/.f64 (*.f64 (neg.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 b a) b) a)) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (+.f64 (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale y-scale)))))))) #s(literal 1 binary64)) (*.f64 (/.f64 #s(literal -1 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (*.f64 (*.f64 (*.f64 b (neg.f64 a)) (*.f64 #s(literal 4 binary64) (*.f64 b a))) #s(literal -1 binary64)))) |
(/.f64 (*.f64 (neg.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 b a) b) a)) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (+.f64 (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale y-scale)))))))) #s(literal -1 binary64)) (*.f64 (/.f64 #s(literal -1 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (*.f64 (*.f64 b (neg.f64 a)) (*.f64 #s(literal 4 binary64) (*.f64 b a))))) |
(/.f64 (*.f64 (neg.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 b a) b) a)) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (+.f64 (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale y-scale)))))))) (neg.f64 (/.f64 #s(literal -1 binary64) (*.f64 b a)))) (*.f64 (/.f64 #s(literal -1 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (*.f64 #s(literal 4 binary64) (*.f64 b a)))) |
(/.f64 (*.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 b a) b) a)) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (+.f64 (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale y-scale)))))))) (/.f64 (*.f64 (*.f64 b a) (*.f64 #s(literal 4 binary64) (*.f64 b a))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))) |
(/.f64 (*.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 b a) b) a)) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (+.f64 (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale y-scale)))))))) (*.f64 (*.f64 (*.f64 (*.f64 b (neg.f64 a)) (*.f64 #s(literal 4 binary64) (*.f64 b a))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))) |
(/.f64 (*.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 b a) b) a)) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (+.f64 (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale y-scale))))))))) (/.f64 (*.f64 (*.f64 b (neg.f64 a)) (*.f64 #s(literal 4 binary64) (*.f64 b a))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))) |
(/.f64 (*.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 b a) b) a)) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (+.f64 (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale y-scale))))))))) (*.f64 (*.f64 (*.f64 (*.f64 b (neg.f64 a)) (*.f64 #s(literal 4 binary64) (*.f64 b a))) #s(literal -1 binary64)) (/.f64 #s(literal -1 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))) |
(/.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 b a) b) a)) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (+.f64 (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale y-scale))))))))) (/.f64 (*.f64 (*.f64 b a) (*.f64 #s(literal 4 binary64) (*.f64 b a))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))) |
(/.f64 (*.f64 (neg.f64 (/.f64 #s(literal -1 binary64) (*.f64 b a))) (sqrt.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 b a) b) a)) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (+.f64 (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale y-scale)))))))) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 b a)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))) |
(/.f64 (*.f64 (neg.f64 (/.f64 #s(literal -1 binary64) (*.f64 b a))) #s(literal 1 binary64)) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 b a)) (/.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 b a) b) a)) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (+.f64 (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale y-scale))))))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))))) |
(/.f64 (*.f64 (neg.f64 (/.f64 #s(literal -1 binary64) (*.f64 b a))) (neg.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 b a) b) a)) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (+.f64 (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale y-scale))))))))) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 b a)) (/.f64 #s(literal -1 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))) |
(/.f64 (neg.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 b a) (*.f64 #s(literal 4 binary64) (*.f64 b a)))) (sqrt.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 b a) b) a)) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (+.f64 (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale y-scale))))))))) (/.f64 #s(literal -1 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))) |
(/.f64 (neg.f64 (neg.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 b a) b) a)) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (+.f64 (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale y-scale))))))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))) (*.f64 (*.f64 b a) (*.f64 #s(literal 4 binary64) (*.f64 b a)))) |
(/.f64 (neg.f64 (neg.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 b a) b) a)) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (+.f64 (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale y-scale))))))))) (/.f64 (*.f64 (*.f64 b a) (*.f64 #s(literal 4 binary64) (*.f64 b a))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))) |
(*.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 b a) b) a)) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (+.f64 (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale y-scale))))))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 b a) (*.f64 #s(literal 4 binary64) (*.f64 b a))))) |
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 b a) (*.f64 #s(literal 4 binary64) (*.f64 b a)))) (*.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 b a) b) a)) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (+.f64 (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale y-scale))))))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))) |
(*.f64 (neg.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 b a) b) a)) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (+.f64 (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale y-scale)))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 (*.f64 b (neg.f64 a)) (*.f64 #s(literal 4 binary64) (*.f64 b a))))) |
(*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 b a) (*.f64 #s(literal 4 binary64) (*.f64 b a)))) (sqrt.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 b a) b) a)) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (+.f64 (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale y-scale)))))))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) |
(*.f64 (neg.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 b a) b) a)) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (+.f64 (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale y-scale))))))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))) (/.f64 #s(literal -1 binary64) (*.f64 (*.f64 b a) (*.f64 #s(literal 4 binary64) (*.f64 b a))))) |
(*.f64 (neg.f64 (/.f64 #s(literal -1 binary64) (*.f64 b a))) (/.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 b a) b) a)) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (+.f64 (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale y-scale))))))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (*.f64 #s(literal 4 binary64) (*.f64 b a)))) |
(*.f64 #s(literal -1/4 binary64) (/.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 b a) b) a)) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (+.f64 (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale y-scale))))))) (/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 b a) b) a)) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))) |
(*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 b a) b) a)) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (+.f64 (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale y-scale))))))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (neg.f64 (*.f64 (*.f64 (*.f64 b a) b) a)))) |
(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 b a) (*.f64 #s(literal 4 binary64) (*.f64 b a)))) #s(literal 1 binary64)) (*.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 b a) b) a)) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (+.f64 (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale y-scale))))))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))) |
(*.f64 (/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 (*.f64 (*.f64 b a) b) a))) (/.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 b a) b) a)) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (+.f64 (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale y-scale))))))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) #s(literal 4 binary64))) |
(*.f64 (/.f64 #s(literal -1 binary64) (*.f64 #s(literal 4 binary64) (*.f64 b a))) (/.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 b a) b) a)) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (+.f64 (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale y-scale))))))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (*.f64 b (neg.f64 a)))) |
(*.f64 (/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 #s(literal 4 binary64) (*.f64 b a)))) (/.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 b a) b) a)) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (+.f64 (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale y-scale))))))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (*.f64 b a))) |
(neg.f64 (*.f64 (*.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 b b) (*.f64 a a))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))) |
(neg.f64 (*.f64 (*.f64 (*.f64 (*.f64 b b) (*.f64 a a)) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 b b) (*.f64 a a)))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))) |
(neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 b b) (*.f64 a a)) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))) |
(neg.f64 (/.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 b a) b) a)) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale (neg.f64 y-scale))))) |
(/.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 b a) b) a)) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) |
(/.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 b a) b) a)) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 b b) (*.f64 a a)))) (neg.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale (neg.f64 y-scale))))) |
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 b a) b) a)) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 b b) (*.f64 a a)))))) |
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 b a) b) a)) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 b b) (*.f64 a a))))) #s(literal 1 binary64))) |
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) (/.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 b a) b) a)) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 b b) (*.f64 a a)))) x-scale))) |
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 b a) b) a)) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 b b) (*.f64 a a))))))) |
(/.f64 (*.f64 (*.f64 (*.f64 b b) (*.f64 a a)) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale (neg.f64 y-scale)))) |
(/.f64 (/.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 b a) b) a)) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 b b) (*.f64 a a)))) x-scale) (*.f64 y-scale (*.f64 x-scale y-scale))) |
(/.f64 (neg.f64 (/.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 b a) b) a)) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 b b) (*.f64 a a)))) x-scale)) (neg.f64 (*.f64 y-scale (*.f64 x-scale y-scale)))) |
(pow.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 b a) b) a)) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 b b) (*.f64 a a))))) #s(literal -1 binary64)) |
(*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 b a) b) a)) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 b b) (*.f64 a a))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))) |
(*.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 b a) b) a)) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 b b) (*.f64 a a)))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))) |
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 b a) b) a)) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))) |
(*.f64 (*.f64 (*.f64 (*.f64 b b) (*.f64 a a)) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 b b) (*.f64 a a)))) (/.f64 #s(literal -1 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))) |
(*.f64 (/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 b a) b) a)) x-scale) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale (*.f64 x-scale y-scale)))) |
(*.f64 (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 b a) b) a)) x-scale)) |
(*.f64 (/.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 b a) b) a)) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 b b) (*.f64 a a)))) x-scale) (/.f64 #s(literal 1 binary64) (*.f64 y-scale (*.f64 x-scale y-scale)))) |
(*.f64 (/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 b a) b) a)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 b b) (*.f64 a a))) (*.f64 x-scale y-scale))) |
(*.f64 (/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 b a) b) a)) (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 b b) (*.f64 a a))) x-scale)) |
(*.f64 (/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 b a) b) a)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale))) |
(*.f64 (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 b b) (*.f64 a a))) (*.f64 x-scale y-scale)) (/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 b a) b) a)) (*.f64 x-scale y-scale))) |
(*.f64 (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 b b) (*.f64 a a))) x-scale) (/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 b a) b) a)) (*.f64 y-scale (*.f64 x-scale y-scale)))) |
(*.f64 (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 b b) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 b a) b) a)) (*.f64 y-scale y-scale))) |
(sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) |
(*.f64 #s(literal 2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) |
(+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (neg.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) |
(cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) |
(-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) |
(fma.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (neg.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) |
(fma.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/4 binary64) (+.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) #s(literal 2 binary64)) (*.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (neg.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) |
(fma.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (neg.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) |
(fma.f64 (exp.f64 (log.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (exp.f64 (log.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (neg.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) |
(/.f64 (-.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) #s(literal 3 binary64))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))))) |
(/.f64 (-.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) |
(*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (-.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) |
(neg.f64 (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -2 binary64) (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (neg.f64 (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) |
(neg.f64 (/.f64 (neg.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -2 binary64) (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) |
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -2 binary64) (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))))) |
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -2 binary64) (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) #s(literal 1 binary64))) |
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -2 binary64) (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))))) |
(/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -2 binary64) (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) |
(/.f64 (neg.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -2 binary64) (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (neg.f64 (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) |
(/.f64 (*.f64 (fma.f64 #s(literal -8 binary64) (pow.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a))))))) (*.f64 y-scale y-scale)) #s(literal 3 binary64))) #s(literal 1 binary64)) (*.f64 (+.f64 (pow.f64 (*.f64 #s(literal -2 binary64) (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (-.f64 (pow.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a))))))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) (*.f64 (*.f64 #s(literal -2 binary64) (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a))))))) (*.f64 y-scale y-scale))))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) |
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 #s(literal -2 binary64) (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a))))))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) |
(/.f64 (neg.f64 (neg.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -2 binary64) (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))))) (neg.f64 (neg.f64 (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) |
(pow.f64 (/.f64 (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -2 binary64) (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) #s(literal -1 binary64)) |
(*.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -2 binary64) (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) |
(*.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -2 binary64) (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) |
(*.f64 (neg.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -2 binary64) (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (/.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) |
(+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a))))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -2 binary64) (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) |
(+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a))))))) (*.f64 y-scale y-scale))) |
(-.f64 (/.f64 (pow.f64 (*.f64 #s(literal -2 binary64) (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale))))) (/.f64 (pow.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a))))))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale)))))) |
(fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -2 binary64) (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) |
(fma.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a))))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -2 binary64) (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) |
(fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a))))))) (*.f64 y-scale y-scale))) |
(fma.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) #s(literal -2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a))))))) (*.f64 y-scale y-scale))) |
(fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a))))))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal -2 binary64) (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) |
(fma.f64 (*.f64 (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) #s(literal -2 binary64)) (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a))))))) (*.f64 y-scale y-scale))) |
(fma.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a)))))) #s(literal -4 binary64)) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 y-scale y-scale))) (*.f64 #s(literal -2 binary64) (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) |
(fma.f64 (/.f64 #s(literal 4 binary64) y-scale) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a)))))) y-scale) (*.f64 #s(literal -2 binary64) (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) |
(fma.f64 (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a)))))) y-scale) (/.f64 #s(literal 4 binary64) y-scale) (*.f64 #s(literal -2 binary64) (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) |
(fma.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a))))))) y-scale) (/.f64 #s(literal 1 binary64) y-scale) (*.f64 #s(literal -2 binary64) (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) |
(fma.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) y-scale) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a))))) y-scale) (*.f64 #s(literal -2 binary64) (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) |
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (pow.f64 (*.f64 #s(literal -2 binary64) (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (-.f64 (pow.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a))))))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) (*.f64 (*.f64 #s(literal -2 binary64) (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a))))))) (*.f64 y-scale y-scale))))) (fma.f64 #s(literal -8 binary64) (pow.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a))))))) (*.f64 y-scale y-scale)) #s(literal 3 binary64))))) |
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale)))) (-.f64 (pow.f64 (*.f64 #s(literal -2 binary64) (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a))))))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))))) |
(/.f64 (fma.f64 #s(literal -8 binary64) (pow.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a))))))) (*.f64 y-scale y-scale)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 #s(literal -2 binary64) (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (-.f64 (pow.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a))))))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) (*.f64 (*.f64 #s(literal -2 binary64) (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a))))))) (*.f64 y-scale y-scale)))))) |
(/.f64 (-.f64 (pow.f64 (*.f64 #s(literal -2 binary64) (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a))))))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale))))) |
(/.f64 (neg.f64 (fma.f64 #s(literal -8 binary64) (pow.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a))))))) (*.f64 y-scale y-scale)) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (*.f64 #s(literal -2 binary64) (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (-.f64 (pow.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a))))))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) (*.f64 (*.f64 #s(literal -2 binary64) (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a))))))) (*.f64 y-scale y-scale))))))) |
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 #s(literal -2 binary64) (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a))))))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)))) (neg.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale)))))) |
(/.f64 (fma.f64 #s(literal 64 binary64) (pow.f64 (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale)) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal -2 binary64) (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) #s(literal 3 binary64))) (+.f64 (pow.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a))))))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 #s(literal -2 binary64) (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a))))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -2 binary64) (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))))) |
(/.f64 (-.f64 (pow.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a))))))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal -2 binary64) (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64))) (-.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a))))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -2 binary64) (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) |
(*.f64 (fma.f64 #s(literal -8 binary64) (pow.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a))))))) (*.f64 y-scale y-scale)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (*.f64 #s(literal -2 binary64) (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (-.f64 (pow.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a))))))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) (*.f64 (*.f64 #s(literal -2 binary64) (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a))))))) (*.f64 y-scale y-scale))))))) |
(*.f64 (-.f64 (pow.f64 (*.f64 #s(literal -2 binary64) (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a))))))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (fma.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale)))))) |
Compiled 646 911 to 8 602 computations (98.7% saved)
47 alts after pruning (46 fresh and 1 done)
| Pruned | Kept | Total | |
|---|---|---|---|
| New | 2 193 | 41 | 2 234 |
| Fresh | 8 | 5 | 13 |
| Picked | 4 | 1 | 5 |
| Done | 0 | 0 | 0 |
| Total | 2 205 | 47 | 2 252 |
| Status | Accuracy | Program |
|---|---|---|
| 2.6% | (/.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 b a) b) a)) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (+.f64 (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale y-scale))))))) (neg.f64 (/.f64 #s(literal -1 binary64) (*.f64 b a)))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (*.f64 #s(literal 4 binary64) (*.f64 b a)))) | |
| 2.8% | (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (exp.f64 (*.f64 (log.f64 (*.f64 x-scale y-scale)) #s(literal 2 binary64))))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) | |
| 1.2% | (*.f64 (/.f64 (sqrt.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 b (neg.f64 a)) (*.f64 #s(literal 4 binary64) (*.f64 b a))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (neg.f64 (*.f64 (*.f64 (*.f64 b a) b) a)))) (+.f64 (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 b a) (*.f64 #s(literal 4 binary64) (*.f64 b a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) | |
| 2.6% | (*.f64 (/.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (*.f64 a b)) (*.f64 #s(literal 4 binary64) (*.f64 a b)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))) (*.f64 #s(literal 8 binary64) (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (* angle (PI)) 1/180))) #s(literal 1 binary64)))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale))))))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))) | |
| 0.4% | (*.f64 (/.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (*.f64 a b)) (*.f64 #s(literal 4 binary64) (*.f64 a b)))) (/.f64 (sqrt.f64 (*.f64 #s(approx (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (*.f64 #s(literal 8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale))))))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))) | |
| 9.2% | (*.f64 (/.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (*.f64 a b)) (*.f64 #s(literal 4 binary64) (*.f64 a b)))) #s(approx (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale))))) (*.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))))) | |
| ▶ | 3.6% | (*.f64 (/.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (*.f64 a b)) (*.f64 #s(literal 4 binary64) (*.f64 a b)))) #s(approx (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale))))) (*.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))))))) |
| 7.8% | (*.f64 (/.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (*.f64 a b)) (*.f64 #s(literal 4 binary64) (*.f64 a b)))) #s(approx (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale))))) (*.f64 (*.f64 a a) (*.f64 (*.f64 b (*.f64 b b)) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))) | |
| 2.6% | (*.f64 (*.f64 (neg.f64 (/.f64 #s(literal -1 binary64) (*.f64 b a))) (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (*.f64 b a)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))) (*.f64 #s(literal 8 binary64) (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale))))))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))) | |
| 1.7% | (*.f64 #s(literal -1/4 binary64) (/.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 b a) b) a)) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (+.f64 (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale y-scale))))))) (/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 b a) b) a)) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))) | |
| 2.6% | (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 (neg.f64 (*.f64 a b)) (*.f64 #s(literal 4 binary64) (*.f64 a b))) (*.f64 (neg.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))) (*.f64 #s(literal 8 binary64) (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)))))))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))) #s(literal -1 binary64))) | |
| 37.4% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 (*.f64 b #s(literal 1/4 binary64)) (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 8 binary64)))) | |
| ▶ | 37.6% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 y-scale #s(literal 4 binary64)) (*.f64 b #s(literal 1/4 binary64)))) |
| 16.3% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) | |
| 19.2% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) | |
| 40.3% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 #s(approx (sin (* 1/180 (* angle (PI)))) (*.f64 angle (fma.f64 #s(literal -1/34992000 binary64) (*.f64 (*.f64 angle angle) (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64)))) (*.f64 #s(literal 1/180 binary64) (PI.f64))))) #s(literal 2 binary64)) (*.f64 a a))))))) | |
| ▶ | 43.1% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (pow.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a))))))) |
| 34.3% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (exp.f64 (*.f64 (log.f64 (*.f64 #s(literal 2 binary64) (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))))) #s(literal 1/2 binary64))))) | |
| 19.3% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) #s(approx (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))) | |
| 26.0% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) #s(approx (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 angle angle) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))))))) b) (*.f64 b (sqrt.f64 #s(literal 2 binary64))))))) | |
| 34.9% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) #s(approx (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (*.f64 b (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))) | |
| 37.4% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) #s(approx (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (*.f64 b (sqrt.f64 #s(literal 2 binary64)))))) | |
| 12.5% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) #s(approx (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))) | |
| 5.7% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) #s(approx (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (neg.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))) | |
| 9.6% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) #s(approx (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (neg.f64 (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))) | |
| 5.9% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (fma.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 a #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))))))) | |
| 40.7% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b))))))) | |
| ✓ | 37.4% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))) |
| 37.6% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 (*.f64 y-scale (exp.f64 (*.f64 (log.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 8 binary64))))) | |
| 37.3% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) b) #s(approx (* (* y-scale (sqrt 2)) (sqrt 8)) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))) | |
| 6.7% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) #s(approx (/ (+ (* -2 (* (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (/ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (* (+ b a) (- b a)) (* (+ b a) (- b a)))))) (* y-scale y-scale))) (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale)))) (*.f64 #s(literal -2 binary64) (*.f64 b b))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))))))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))))))))) | |
| 20.9% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 x-scale #s(approx (+ (* 1/8 (/ (* (* (* y-scale (sqrt 8)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (/ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (* (+ b a) (- b a)) (* (+ b a) (- b a)))))) (* y-scale y-scale))) (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (sqrt (/ 1 (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (* x-scale x-scale))) (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 #s(literal 0 binary64) (*.f64 b b))))) (*.f64 a (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/4 binary64) (*.f64 a (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))) | |
| 4.4% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 x-scale #s(approx (+ (* 1/8 (/ (* (* (* y-scale (sqrt 8)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (/ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (* (+ b a) (- b a)) (* (+ b a) (- b a)))))) (* y-scale y-scale))) (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (sqrt (/ 1 (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (* x-scale x-scale))) (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (*.f64 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))))) | |
| ▶ | 5.1% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 x-scale #s(approx (+ (* 1/8 (/ (* (* (* y-scale (sqrt 8)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (/ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (* (+ b a) (- b a)) (* (+ b a) (- b a)))))) (* y-scale y-scale))) (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (sqrt (/ 1 (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (* x-scale x-scale))) (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (neg.f64 (*.f64 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))))) |
| 23.2% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 angle angle) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))))))))) b) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))) | |
| ▶ | 34.8% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))) |
| 12.5% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 a (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))) | |
| 5.7% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))) | |
| 9.6% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 a (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))) | |
| 40.6% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* x-scale (+ (* 1/8 (/ (* (* (* y-scale (sqrt 8)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (/ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (* (+ b a) (- b a)) (* (+ b a) (- b a)))))) (* y-scale y-scale))) (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (sqrt (/ 1 (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (* x-scale x-scale))) (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale)))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) | |
| 35.0% | #s(approx (* (/ -1 (* (neg (* a b)) (* 4 (* a b)))) (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))))) | |
| 4.5% | #s(approx (* (/ -1 (* (neg (* a b)) (* 4 (* a b)))) (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))))))) | |
| 17.6% | #s(approx (* (/ -1 (* (neg (* a b)) (* 4 (* a b)))) (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))))) | |
| 13.2% | #s(approx (* (/ -1 (* (neg (* a b)) (* 4 (* a b)))) (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))))))) | |
| 35.1% | #s(approx (* (/ -1 (* (neg (* a b)) (* 4 (* a b)))) (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))))) | |
| 15.6% | #s(approx (* (/ -1 (* (neg (* a b)) (* 4 (* a b)))) (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))))))) | |
| 14.8% | #s(approx (* (/ -1 (* (neg (* a b)) (* 4 (* a b)))) (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))))))))) |
Compiled 7 273 to 3 148 computations (56.7% saved)
| 1× | egg-herbie |
Found 20 expressions of interest:
| New | Metric | Score | Program |
|---|---|---|---|
| ✓ | cost-diff | 0 | (*.f64 x-scale #s(approx (+ (* 1/8 (/ (* (* (* y-scale (sqrt 8)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (/ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (* (+ b a) (- b a)) (* (+ b a) (- b a)))))) (* y-scale y-scale))) (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (sqrt (/ 1 (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (* x-scale x-scale))) (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (neg.f64 (*.f64 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))))) |
| ✓ | cost-diff | 0 | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 x-scale #s(approx (+ (* 1/8 (/ (* (* (* y-scale (sqrt 8)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (/ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (* (+ b a) (- b a)) (* (+ b a) (- b a)))))) (* y-scale y-scale))) (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (sqrt (/ 1 (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (* x-scale x-scale))) (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (neg.f64 (*.f64 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))))) |
| ✓ | cost-diff | 128 | (neg.f64 (*.f64 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))) |
| ✓ | cost-diff | 384 | (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) |
| ✓ | cost-diff | 128 | (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) |
| ✓ | cost-diff | 128 | (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) |
| ✓ | cost-diff | 128 | (*.f64 (neg.f64 (*.f64 a b)) (*.f64 #s(literal 4 binary64) (*.f64 a b))) |
| ✓ | cost-diff | 192 | (/.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (*.f64 a b)) (*.f64 #s(literal 4 binary64) (*.f64 a b)))) |
| ✓ | cost-diff | 0 | (*.f64 b (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
| ✓ | cost-diff | 0 | (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))) |
| ✓ | cost-diff | 0 | #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))) |
| ✓ | cost-diff | 0 | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))) |
| ✓ | cost-diff | 0 | (*.f64 b #s(literal 1/4 binary64)) |
| ✓ | cost-diff | 0 | (*.f64 y-scale #s(literal 4 binary64)) |
| ✓ | cost-diff | 0 | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 y-scale #s(literal 4 binary64)) (*.f64 b #s(literal 1/4 binary64)))) |
| ✓ | cost-diff | 640 | (*.f64 (*.f64 y-scale #s(literal 4 binary64)) (*.f64 b #s(literal 1/4 binary64))) |
| ✓ | cost-diff | 0 | (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) |
| ✓ | cost-diff | 0 | (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (pow.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))))) |
| ✓ | cost-diff | 0 | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (pow.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a))))))) |
| ✓ | cost-diff | 6144 | (pow.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) #s(literal 2 binary64)) |
| 8 810× | lower-*.f32 |
| 8 722× | lower-*.f64 |
| 5 050× | lower-fma.f32 |
| 5 044× | lower-fma.f64 |
| 3 450× | lower-+.f32 |
Useful iterations: 0 (0.0ms)
| Iter | Nodes | Cost |
|---|---|---|
| 0 | 228 | 4098 |
| 0 | 319 | 4084 |
| 1 | 812 | 3998 |
| 2 | 3313 | 3983 |
| 0 | 8720 | 3706 |
| 1× | iter limit |
| 1× | node limit |
| 1× | iter limit |
| Inputs |
|---|
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (pow.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (pow.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) |
#s(literal 1/4 binary64) |
(*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) |
y-scale |
(sqrt.f64 #s(literal 8 binary64)) |
#s(literal 8 binary64) |
(sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (pow.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a))))) |
(*.f64 #s(literal 2 binary64) (fma.f64 (pow.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))) |
#s(literal 2 binary64) |
(fma.f64 (pow.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a))) |
(pow.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) #s(literal 2 binary64)) |
#s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) |
#s(literal 1 binary64) |
(*.f64 b b) |
b |
(*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) |
(pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) |
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
(*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) |
#s(literal 1/180 binary64) |
(*.f64 angle (PI.f64)) |
angle |
(PI.f64) |
(*.f64 a a) |
a |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 y-scale #s(literal 4 binary64)) (*.f64 b #s(literal 1/4 binary64)))) |
(*.f64 (*.f64 y-scale #s(literal 4 binary64)) (*.f64 b #s(literal 1/4 binary64))) |
(*.f64 y-scale #s(literal 4 binary64)) |
y-scale |
#s(literal 4 binary64) |
(*.f64 b #s(literal 1/4 binary64)) |
b |
#s(literal 1/4 binary64) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))) |
#s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))) |
#s(literal 1/4 binary64) |
(*.f64 b (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
b |
(*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
y-scale |
(*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) |
(cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
(*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) |
#s(literal 1/180 binary64) |
(*.f64 angle (PI.f64)) |
angle |
(PI.f64) |
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) |
(sqrt.f64 #s(literal 2 binary64)) |
#s(literal 2 binary64) |
(sqrt.f64 #s(literal 8 binary64)) |
#s(literal 8 binary64) |
(*.f64 (/.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (*.f64 a b)) (*.f64 #s(literal 4 binary64) (*.f64 a b)))) #s(approx (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale))))) (*.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))))))) |
(/.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (*.f64 a b)) (*.f64 #s(literal 4 binary64) (*.f64 a b)))) |
#s(literal -1 binary64) |
(*.f64 (neg.f64 (*.f64 a b)) (*.f64 #s(literal 4 binary64) (*.f64 a b))) |
(neg.f64 (*.f64 a b)) |
(*.f64 a b) |
a |
b |
(*.f64 #s(literal 4 binary64) (*.f64 a b)) |
#s(literal 4 binary64) |
#s(approx (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale))))) (*.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))) |
(*.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))))) |
(*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) |
(*.f64 a a) |
(*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) |
(*.f64 b b) |
(*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) |
x-scale |
(*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) |
y-scale |
(sqrt.f64 #s(literal 8 binary64)) |
#s(literal 8 binary64) |
(sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) |
(*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) |
#s(literal 2 binary64) |
(+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) |
(/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) |
(*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) |
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) |
#s(literal 1/2 binary64) |
(*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) |
#s(literal -1/2 binary64) |
(cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) |
(*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))) |
#s(literal 1/90 binary64) |
(*.f64 angle (PI.f64)) |
angle |
(PI.f64) |
(*.f64 x-scale x-scale) |
(/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) |
(*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) |
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) |
(*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 x-scale #s(approx (+ (* 1/8 (/ (* (* (* y-scale (sqrt 8)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (/ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (* (+ b a) (- b a)) (* (+ b a) (- b a)))))) (* y-scale y-scale))) (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (sqrt (/ 1 (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (* x-scale x-scale))) (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (neg.f64 (*.f64 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))))) |
(*.f64 x-scale #s(approx (+ (* 1/8 (/ (* (* (* y-scale (sqrt 8)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (/ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (* (+ b a) (- b a)) (* (+ b a) (- b a)))))) (* y-scale y-scale))) (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (sqrt (/ 1 (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (* x-scale x-scale))) (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (neg.f64 (*.f64 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))))) |
x-scale |
#s(approx (+ (* 1/8 (/ (* (* (* y-scale (sqrt 8)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (/ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (* (+ b a) (- b a)) (* (+ b a) (- b a)))))) (* y-scale y-scale))) (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (sqrt (/ 1 (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (* x-scale x-scale))) (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (neg.f64 (*.f64 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))) |
(neg.f64 (*.f64 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))) |
(*.f64 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))) |
b |
(fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
#s(literal 1/8 binary64) |
(/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) |
(*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) |
(*.f64 y-scale y-scale) |
y-scale |
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) |
(sqrt.f64 #s(literal 1/2 binary64)) |
#s(literal 1/2 binary64) |
(*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) |
(sqrt.f64 #s(literal 8 binary64)) |
#s(literal 8 binary64) |
(fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) |
(/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) |
(*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) |
(*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) |
(/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) |
(*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) |
(pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) |
(cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
(*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) |
#s(literal 1/180 binary64) |
(*.f64 angle (PI.f64)) |
angle |
(PI.f64) |
#s(literal 2 binary64) |
(pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) |
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
(*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) |
(*.f64 x-scale x-scale) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
#s(literal 1/4 binary64) |
(*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) |
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) |
(sqrt.f64 #s(literal 2 binary64)) |
| Outputs |
|---|
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (pow.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) #s(literal 1/4 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64))) (*.f64 b b))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (pow.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))))) |
(*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) #s(literal 1/4 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64))) (*.f64 b b)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) |
(*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) #s(literal 1/4 binary64))) |
#s(literal 1/4 binary64) |
(*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) |
y-scale |
(sqrt.f64 #s(literal 8 binary64)) |
#s(literal 8 binary64) |
(sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (pow.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a))))) |
(sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64))) (*.f64 b b))))) |
(*.f64 #s(literal 2 binary64) (fma.f64 (pow.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))) |
(*.f64 #s(literal 2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64))) (*.f64 b b)))) |
#s(literal 2 binary64) |
(fma.f64 (pow.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a))) |
(fma.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64))) (*.f64 b b))) |
(pow.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) #s(literal 2 binary64)) |
(*.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64))) |
#s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) |
#s(literal 1 binary64) |
(*.f64 b b) |
b |
(*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) |
(*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 a a)) |
(pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) |
(pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) |
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
(sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) |
(*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) |
(*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))) |
#s(literal 1/180 binary64) |
(*.f64 angle (PI.f64)) |
angle |
(PI.f64) |
(*.f64 a a) |
a |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 y-scale #s(literal 4 binary64)) (*.f64 b #s(literal 1/4 binary64)))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 b y-scale)) |
(*.f64 (*.f64 y-scale #s(literal 4 binary64)) (*.f64 b #s(literal 1/4 binary64))) |
(*.f64 b y-scale) |
(*.f64 y-scale #s(literal 4 binary64)) |
(*.f64 #s(literal 4 binary64) y-scale) |
y-scale |
#s(literal 4 binary64) |
(*.f64 b #s(literal 1/4 binary64)) |
b |
#s(literal 1/4 binary64) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (*.f64 b y-scale) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) |
#s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))) |
#s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (*.f64 b y-scale) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (*.f64 b y-scale) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))) |
#s(literal 1/4 binary64) |
(*.f64 b (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(*.f64 (*.f64 (*.f64 b y-scale) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) |
b |
(*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 8 binary64)) (sqrt.f64 #s(literal 2 binary64))) y-scale)) |
y-scale |
(*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) |
(*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (sqrt.f64 #s(literal 2 binary64)))) |
(cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
(cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) |
(*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) |
(*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))) |
#s(literal 1/180 binary64) |
(*.f64 angle (PI.f64)) |
angle |
(PI.f64) |
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) |
(*.f64 (sqrt.f64 #s(literal 8 binary64)) (sqrt.f64 #s(literal 2 binary64))) |
(sqrt.f64 #s(literal 2 binary64)) |
#s(literal 2 binary64) |
(sqrt.f64 #s(literal 8 binary64)) |
#s(literal 8 binary64) |
(*.f64 (/.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (*.f64 a b)) (*.f64 #s(literal 4 binary64) (*.f64 a b)))) #s(approx (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale))))) (*.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))))))) |
(*.f64 (/.f64 #s(literal -1/4 binary64) (*.f64 a (*.f64 b (*.f64 a (neg.f64 b))))) #s(approx (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale))))) (*.f64 (*.f64 (*.f64 a a) (*.f64 b (*.f64 b (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale)))))))) |
(/.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (*.f64 a b)) (*.f64 #s(literal 4 binary64) (*.f64 a b)))) |
(/.f64 #s(literal -1/4 binary64) (*.f64 a (*.f64 b (*.f64 a (neg.f64 b))))) |
#s(literal -1 binary64) |
(*.f64 (neg.f64 (*.f64 a b)) (*.f64 #s(literal 4 binary64) (*.f64 a b))) |
(*.f64 (*.f64 b a) (*.f64 (*.f64 b a) #s(literal -4 binary64))) |
(neg.f64 (*.f64 a b)) |
(*.f64 a (neg.f64 b)) |
(*.f64 a b) |
(*.f64 b a) |
a |
b |
(*.f64 #s(literal 4 binary64) (*.f64 a b)) |
(*.f64 #s(literal 4 binary64) (*.f64 b a)) |
#s(literal 4 binary64) |
#s(approx (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale))))) (*.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))) |
#s(approx (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale))))) (*.f64 (*.f64 (*.f64 a a) (*.f64 b (*.f64 b (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale))))))) |
(*.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))))) |
(*.f64 (*.f64 (*.f64 a a) (*.f64 b (*.f64 b (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale)))))) |
(*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) |
(*.f64 (*.f64 a a) (*.f64 b (*.f64 b (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))))) |
(*.f64 a a) |
(*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) |
(*.f64 b (*.f64 b (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) |
(*.f64 b b) |
(*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) |
x-scale |
(*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) |
y-scale |
(sqrt.f64 #s(literal 8 binary64)) |
#s(literal 8 binary64) |
(sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) |
(sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale))))) |
(*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) |
(*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale)))) |
#s(literal 2 binary64) |
(+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) |
(fma.f64 (*.f64 b b) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale))) |
(/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) |
(/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale)) |
(*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) |
(*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) |
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) |
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) |
#s(literal 1/2 binary64) |
(*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) |
(*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))) |
#s(literal -1/2 binary64) |
(cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) |
(cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) |
(*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))) |
(*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))) |
#s(literal 1/90 binary64) |
(*.f64 angle (PI.f64)) |
angle |
(PI.f64) |
(*.f64 x-scale x-scale) |
(/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) |
(/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale)) |
(*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) |
(*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) |
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) |
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) |
(*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) |
(*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 x-scale #s(approx (+ (* 1/8 (/ (* (* (* y-scale (sqrt 8)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (/ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (* (+ b a) (- b a)) (* (+ b a) (- b a)))))) (* y-scale y-scale))) (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (sqrt (/ 1 (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (* x-scale x-scale))) (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (neg.f64 (*.f64 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 x-scale #s(approx (+ (* 1/8 (/ (* (* (* y-scale (sqrt 8)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (/ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (* (+ b a) (- b a)) (* (+ b a) (- b a)))))) (* y-scale y-scale))) (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (sqrt (/ 1 (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (* x-scale x-scale))) (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (*.f64 b (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) #s(literal 2 binary64)))) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) (*.f64 x-scale x-scale))) #s(literal -1/8 binary64) (*.f64 (*.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal -1/4 binary64))))))) |
(*.f64 x-scale #s(approx (+ (* 1/8 (/ (* (* (* y-scale (sqrt 8)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (/ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (* (+ b a) (- b a)) (* (+ b a) (- b a)))))) (* y-scale y-scale))) (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (sqrt (/ 1 (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (* x-scale x-scale))) (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (neg.f64 (*.f64 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))))) |
(*.f64 x-scale #s(approx (+ (* 1/8 (/ (* (* (* y-scale (sqrt 8)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (/ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (* (+ b a) (- b a)) (* (+ b a) (- b a)))))) (* y-scale y-scale))) (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (sqrt (/ 1 (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (* x-scale x-scale))) (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (*.f64 b (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) #s(literal 2 binary64)))) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) (*.f64 x-scale x-scale))) #s(literal -1/8 binary64) (*.f64 (*.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal -1/4 binary64)))))) |
x-scale |
#s(approx (+ (* 1/8 (/ (* (* (* y-scale (sqrt 8)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (/ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (* (+ b a) (- b a)) (* (+ b a) (- b a)))))) (* y-scale y-scale))) (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (sqrt (/ 1 (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (* x-scale x-scale))) (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (neg.f64 (*.f64 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))) |
#s(approx (+ (* 1/8 (/ (* (* (* y-scale (sqrt 8)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (/ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (* (+ b a) (- b a)) (* (+ b a) (- b a)))))) (* y-scale y-scale))) (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (sqrt (/ 1 (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (* x-scale x-scale))) (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (*.f64 b (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) #s(literal 2 binary64)))) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) (*.f64 x-scale x-scale))) #s(literal -1/8 binary64) (*.f64 (*.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal -1/4 binary64))))) |
(neg.f64 (*.f64 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))) |
(*.f64 b (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) #s(literal 2 binary64)))) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) (*.f64 x-scale x-scale))) #s(literal -1/8 binary64) (*.f64 (*.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal -1/4 binary64)))) |
(*.f64 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))) |
(*.f64 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) #s(literal 2 binary64)))) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (sqrt.f64 #s(literal 2 binary64))))))) |
b |
(fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) #s(literal 2 binary64)))) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (sqrt.f64 #s(literal 2 binary64)))))) |
#s(literal 1/8 binary64) |
(/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) |
(/.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) #s(literal 2 binary64)))) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) (*.f64 x-scale x-scale))) |
(*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) |
(*.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) #s(literal 2 binary64)))) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) |
(*.f64 y-scale y-scale) |
y-scale |
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) |
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) #s(literal 2 binary64)))) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) |
(sqrt.f64 #s(literal 1/2 binary64)) |
#s(literal 1/2 binary64) |
(*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) |
(*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) #s(literal 2 binary64)))) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) |
(sqrt.f64 #s(literal 8 binary64)) |
#s(literal 8 binary64) |
(fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) |
(fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) #s(literal 2 binary64)))) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) |
(/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) |
(/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) #s(literal 2 binary64)))) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) |
(*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) |
(*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 y-scale y-scale))) |
(*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) |
(/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) |
(/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) |
(*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) |
(*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) |
(*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) |
(pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) |
(pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) |
(cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
(cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) |
(*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) |
(*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))) |
#s(literal 1/180 binary64) |
(*.f64 angle (PI.f64)) |
angle |
(PI.f64) |
#s(literal 2 binary64) |
(pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) |
(pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) |
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
(sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) |
(*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) |
(*.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) (*.f64 x-scale x-scale)) |
(*.f64 x-scale x-scale) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (sqrt.f64 #s(literal 2 binary64))))) |
#s(literal 1/4 binary64) |
(*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) |
(*.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (sqrt.f64 #s(literal 2 binary64)))) |
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) |
(*.f64 (sqrt.f64 #s(literal 8 binary64)) (sqrt.f64 #s(literal 2 binary64))) |
(sqrt.f64 #s(literal 2 binary64)) |
Found 20 expressions of interest:
| New | Metric | Score | Program |
|---|---|---|---|
| ✓ | accuracy | 68.9% | (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) |
| ✓ | accuracy | 65.4% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 x-scale #s(approx (+ (* 1/8 (/ (* (* (* y-scale (sqrt 8)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (/ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (* (+ b a) (- b a)) (* (+ b a) (- b a)))))) (* y-scale y-scale))) (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (sqrt (/ 1 (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (* x-scale x-scale))) (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (neg.f64 (*.f64 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))))) |
| ✓ | accuracy | 61.1% | (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) |
| ✓ | accuracy | 27.9% | #s(approx (+ (* 1/8 (/ (* (* (* y-scale (sqrt 8)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (/ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (* (+ b a) (- b a)) (* (+ b a) (- b a)))))) (* y-scale y-scale))) (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (sqrt (/ 1 (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (* x-scale x-scale))) (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (neg.f64 (*.f64 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))) |
| ✓ | accuracy | 73.0% | (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) |
| ✓ | accuracy | 72.3% | (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) |
| ✓ | accuracy | 70.1% | (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) |
| ✓ | accuracy | 43.5% | (*.f64 (/.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (*.f64 a b)) (*.f64 #s(literal 4 binary64) (*.f64 a b)))) #s(approx (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale))))) (*.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))))))) |
| ✓ | accuracy | 97.0% | (PI.f64) |
| ✓ | accuracy | 70.2% | (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
| ✓ | accuracy | 64.1% | #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))) |
| ✓ | accuracy | 59.1% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))) |
| ✓ | accuracy | 100.0% | (*.f64 (*.f64 y-scale #s(literal 4 binary64)) (*.f64 b #s(literal 1/4 binary64))) |
| ✓ | accuracy | 100.0% | (*.f64 y-scale #s(literal 4 binary64)) |
| ✓ | accuracy | 100.0% | (*.f64 b #s(literal 1/4 binary64)) |
| ✓ | accuracy | 39.9% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 y-scale #s(literal 4 binary64)) (*.f64 b #s(literal 1/4 binary64)))) |
| ✓ | accuracy | 70.7% | (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
| ✓ | accuracy | 68.1% | #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) |
| ✓ | accuracy | 63.3% | (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (pow.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a))))) |
| ✓ | accuracy | 59.1% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (pow.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a))))))) |
| 660.0ms | 161× | 1 | valid |
| 269.0ms | 68× | 2 | valid |
| 32.0ms | 5× | 3 | valid |
| 19.0ms | 14× | 0 | valid |
| 12.0ms | 1× | 2 | exit |
| 10.0ms | 7× | 1 | exit |
Compiled 3 351 to 201 computations (94% saved)
ival-mult: 271.0ms (31.1% of total)ival-cos: 122.0ms (14% of total)ival-add: 103.0ms (11.8% of total)ival-sin: 94.0ms (10.8% of total)ival-div: 79.0ms (9.1% of total)adjust: 68.0ms (7.8% of total)ival-pow2: 49.0ms (5.6% of total)ival-sqrt: 31.0ms (3.6% of total)const: 25.0ms (2.9% of total)ival-sub: 11.0ms (1.3% of total)ival-hypot: 8.0ms (0.9% of total)ival-neg: 7.0ms (0.8% of total)ival-pi: 2.0ms (0.2% of total)exact: 1.0ms (0.1% of total)ival-assert: 0.0ms (0% of total)ival-true: 0.0ms (0% of total)| Inputs |
|---|
#<alt (pow.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) #s(literal 2 binary64))> |
#<alt #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (pow.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))))))> |
#<alt (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (pow.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a))))))> |
#<alt (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))> |
#<alt (*.f64 (*.f64 y-scale #s(literal 4 binary64)) (*.f64 b #s(literal 1/4 binary64)))> |
#<alt #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 y-scale #s(literal 4 binary64)) (*.f64 b #s(literal 1/4 binary64))))> |
#<alt (*.f64 y-scale #s(literal 4 binary64))> |
#<alt (*.f64 b #s(literal 1/4 binary64))> |
#<alt #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))))> |
#<alt #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))> |
#<alt (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))> |
#<alt (*.f64 b (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))> |
#<alt (/.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (*.f64 a b)) (*.f64 #s(literal 4 binary64) (*.f64 a b))))> |
#<alt (*.f64 (neg.f64 (*.f64 a b)) (*.f64 #s(literal 4 binary64) (*.f64 a b)))> |
#<alt (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))> |
#<alt (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))> |
#<alt (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))> |
#<alt (neg.f64 (*.f64 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))> |
#<alt #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 x-scale #s(approx (+ (* 1/8 (/ (* (* (* y-scale (sqrt 8)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (/ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (* (+ b a) (- b a)) (* (+ b a) (- b a)))))) (* y-scale y-scale))) (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (sqrt (/ 1 (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (* x-scale x-scale))) (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (neg.f64 (*.f64 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))))))> |
#<alt (*.f64 x-scale #s(approx (+ (* 1/8 (/ (* (* (* y-scale (sqrt 8)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (/ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (* (+ b a) (- b a)) (* (+ b a) (- b a)))))) (* y-scale y-scale))) (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (sqrt (/ 1 (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (* x-scale x-scale))) (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (neg.f64 (*.f64 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))))> |
#<alt (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (pow.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))))> |
#<alt #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64))> |
#<alt (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))> |
#<alt (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))> |
#<alt (PI.f64)> |
#<alt (*.f64 (/.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (*.f64 a b)) (*.f64 #s(literal 4 binary64) (*.f64 a b)))) #s(approx (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale))))) (*.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))))> |
#<alt (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))> |
#<alt (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))> |
#<alt #s(approx (+ (* 1/8 (/ (* (* (* y-scale (sqrt 8)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (/ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (* (+ b a) (- b a)) (* (+ b a) (- b a)))))) (* y-scale y-scale))) (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (sqrt (/ 1 (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (* x-scale x-scale))) (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (neg.f64 (*.f64 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))))> |
#<alt (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)))> |
| Outputs |
|---|
#<alt 1> |
#<alt (+ 1 (* -1/32400 (* (pow angle 2) (pow (PI) 2))))> |
#<alt (+ 1 (* (pow angle 2) (+ (* -1/32400 (pow (PI) 2)) (* (pow angle 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))))> |
#<alt (+ 1 (* (pow angle 2) (+ (* -1/32400 (pow (PI) 2)) (* (pow angle 2) (+ (* 1/12597120000 (pow (PI) 4)) (+ (* 1/4199040000 (pow (PI) 4)) (* (pow angle 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6))))))))))> |
#<alt (pow (cos (* 1/180 (* angle (PI)))) 2)> |
#<alt (pow (cos (* 1/180 (* angle (PI)))) 2)> |
#<alt (pow (cos (* 1/180 (* angle (PI)))) 2)> |
#<alt (pow (cos (* 1/180 (* angle (PI)))) 2)> |
#<alt (pow (cos (* 1/180 (* angle (PI)))) 2)> |
#<alt (pow (cos (* 1/180 (* angle (PI)))) 2)> |
#<alt (pow (cos (* 1/180 (* angle (PI)))) 2)> |
#<alt (pow (cos (* 1/180 (* angle (PI)))) 2)> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))> |
#<alt (+ (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))> |
#<alt (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))))> |
#<alt (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))))))> |
#<alt (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))> |
#<alt (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))> |
#<alt (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))))> |
#<alt (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))))> |
#<alt (* -1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))> |
#<alt (* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))))> |
#<alt (* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))))> |
#<alt (* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))> |
#<alt (+ (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))> |
#<alt (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))))> |
#<alt (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))))))> |
#<alt (* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))> |
#<alt (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))> |
#<alt (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))> |
#<alt (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))))> |
#<alt (* -1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))> |
#<alt (* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))> |
#<alt (* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))))> |
#<alt (* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))))> |
#<alt (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))> |
#<alt (+ (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))> |
#<alt (+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))))> |
#<alt (+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))> |
#<alt (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))> |
#<alt (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))> |
#<alt (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))))> |
#<alt (* -1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))> |
#<alt (* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))> |
#<alt (* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))))> |
#<alt (* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))))> |
#<alt (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))> |
#<alt (+ (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))> |
#<alt (+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))))> |
#<alt (+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))> |
#<alt (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))> |
#<alt (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))> |
#<alt (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))))> |
#<alt (* -1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))> |
#<alt (* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))> |
#<alt (* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))))> |
#<alt (* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))))> |
#<alt (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))> |
#<alt (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))))))) (* b (sqrt 2)))) (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))))> |
#<alt (+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))))) (* b (sqrt 2)))))))> |
#<alt (+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))))) (* b (sqrt 2)))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))))) (* 1/2 (/ (* (pow x-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2)))))))) (* b (sqrt 2)))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))> |
#<alt (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))> |
#<alt (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))> |
#<alt (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))> |
#<alt (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))> |
#<alt (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))> |
#<alt (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))> |
#<alt (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))> |
#<alt (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))> |
#<alt (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))> |
#<alt (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))> |
#<alt (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))> |
#<alt (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))> |
#<alt (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))> |
#<alt (+ (* 1/8 (/ (* (pow angle 2) (* y-scale (* (sqrt 2) (* (sqrt 8) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))))))) b)) (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))))> |
#<alt (+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* y-scale (* (sqrt 2) (* (sqrt 8) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))))) b)) (* 1/8 (/ (* (pow angle 2) (* y-scale (* (sqrt 2) (* (sqrt 8) (- (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (* 1/4 (/ (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2) (pow b 2)))))))) b)))))> |
#<alt (+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* y-scale (* (sqrt 2) (* (sqrt 8) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))))) b)) (* (pow angle 2) (+ (* 1/8 (/ (* y-scale (* (sqrt 2) (* (sqrt 8) (- (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (* 1/4 (/ (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2) (pow b 2))))))) b)) (* 1/8 (/ (* (pow angle 2) (* y-scale (* (sqrt 2) (* (sqrt 8) (- (+ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6))))) (* 1/2 (/ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (- (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (* 1/4 (/ (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2) (pow b 2))))) (pow b 2)))))))) b)))))))> |
#<alt (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))> |
#<alt (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))> |
#<alt (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))> |
#<alt (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))> |
#<alt (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))> |
#<alt (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))> |
#<alt (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))> |
#<alt (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))> |
#<alt (* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))> |
#<alt (+ (* 1/8 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* a (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))> |
#<alt (+ (* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (* (pow b 2) (+ (* -1/32 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow a 3) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* 1/8 (/ (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (* a (sin (* 1/180 (* angle (PI))))))))))> |
#<alt (+ (* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (* (pow b 2) (+ (* 1/8 (/ (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (* a (sin (* 1/180 (* angle (PI))))))) (* (pow b 2) (+ (* -1/32 (/ (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8)))) (* (pow a 3) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* 1/64 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 6) (* (sqrt 2) (sqrt 8))))) (* (pow a 5) (pow (sin (* 1/180 (* angle (PI)))) 5)))))))))> |
#<alt (* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))> |
#<alt (* b (+ (* 1/8 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))> |
#<alt (* b (+ (* -1/32 (/ (* (pow a 4) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/8 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))> |
#<alt (* b (+ (* -1/32 (/ (* (pow a 4) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/64 (/ (* (pow a 6) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 6) (* (sqrt 2) (sqrt 8))))) (* (pow b 6) (pow (cos (* 1/180 (* angle (PI)))) 5)))) (+ (* 1/8 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))))> |
#<alt (* -1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))> |
#<alt (* -1 (* b (+ (* 1/8 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))> |
#<alt (* -1 (* b (+ (* -1/32 (/ (* (pow a 4) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/8 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))))> |
#<alt (* -1 (* b (+ (* -1/32 (/ (* (pow a 4) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/64 (/ (* (pow a 6) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 6) (* (sqrt 2) (sqrt 8))))) (* (pow b 6) (pow (cos (* 1/180 (* angle (PI)))) 5)))) (+ (* 1/8 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))))> |
#<alt (* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))> |
#<alt (+ (* 1/8 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* b (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))> |
#<alt (+ (* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (* (pow a 2) (+ (* -1/32 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow b 3) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (* 1/8 (/ (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (* b (cos (* 1/180 (* angle (PI))))))))))> |
#<alt (+ (* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (* (pow a 2) (+ (* 1/8 (/ (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (* b (cos (* 1/180 (* angle (PI))))))) (* (pow a 2) (+ (* -1/32 (/ (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8)))) (* (pow b 3) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (* 1/64 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 6) (* (sqrt 2) (sqrt 8))))) (* (pow b 5) (pow (cos (* 1/180 (* angle (PI)))) 5)))))))))> |
#<alt (* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))> |
#<alt (* a (+ (* 1/8 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))> |
#<alt (* a (+ (* -1/32 (/ (* (pow b 4) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/8 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))> |
#<alt (* a (+ (* -1/32 (/ (* (pow b 4) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/64 (/ (* (pow b 6) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 6) (* (sqrt 2) (sqrt 8))))) (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 5)))) (+ (* 1/8 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))))> |
#<alt (* -1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))> |
#<alt (* -1 (* a (+ (* 1/8 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))> |
#<alt (* -1 (* a (+ (* -1/32 (/ (* (pow b 4) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/8 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))))> |
#<alt (* -1 (* a (+ (* -1/32 (/ (* (pow b 4) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/64 (/ (* (pow b 6) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 6) (* (sqrt 2) (sqrt 8))))) (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 5)))) (+ (* 1/8 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))))> |
#<alt (* 1/4 (* y-scale (sqrt 8)))> |
#<alt (* 1/4 (* y-scale (sqrt 8)))> |
#<alt (* 1/4 (* y-scale (sqrt 8)))> |
#<alt (* 1/4 (* y-scale (sqrt 8)))> |
#<alt (* 1/4 (* y-scale (sqrt 8)))> |
#<alt (* 1/4 (* y-scale (sqrt 8)))> |
#<alt (* 1/4 (* y-scale (sqrt 8)))> |
#<alt (* 1/4 (* y-scale (sqrt 8)))> |
#<alt (* 1/4 (* y-scale (sqrt 8)))> |
#<alt (* 1/4 (* y-scale (sqrt 8)))> |
#<alt (* 1/4 (* y-scale (sqrt 8)))> |
#<alt (* 1/4 (* y-scale (sqrt 8)))> |
#<alt (* b y-scale)> |
#<alt (* b y-scale)> |
#<alt (* b y-scale)> |
#<alt (* b y-scale)> |
#<alt (* b y-scale)> |
#<alt (* b y-scale)> |
#<alt (* b y-scale)> |
#<alt (* b y-scale)> |
#<alt (* b y-scale)> |
#<alt (* b y-scale)> |
#<alt (* b y-scale)> |
#<alt (* b y-scale)> |
#<alt (* b y-scale)> |
#<alt (* b y-scale)> |
#<alt (* b y-scale)> |
#<alt (* b y-scale)> |
#<alt (* b y-scale)> |
#<alt (* b y-scale)> |
#<alt (* b y-scale)> |
#<alt (* b y-scale)> |
#<alt (* b y-scale)> |
#<alt (* b y-scale)> |
#<alt (* b y-scale)> |
#<alt (* b y-scale)> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))> |
#<alt (+ (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))> |
#<alt (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))))> |
#<alt (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))))))> |
#<alt (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))> |
#<alt (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))> |
#<alt (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))))> |
#<alt (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))))> |
#<alt (* -1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))> |
#<alt (* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))))> |
#<alt (* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))))> |
#<alt (* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))> |
#<alt (+ (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))> |
#<alt (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))))> |
#<alt (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))))))> |
#<alt (* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))> |
#<alt (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))> |
#<alt (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))> |
#<alt (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))))> |
#<alt (* -1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))> |
#<alt (* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))> |
#<alt (* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))))> |
#<alt (* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))))> |
#<alt (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))> |
#<alt (+ (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))> |
#<alt (+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))))> |
#<alt (+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))> |
#<alt (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))> |
#<alt (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))> |
#<alt (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))))> |
#<alt (* -1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))> |
#<alt (* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))> |
#<alt (* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))))> |
#<alt (* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))))> |
#<alt (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))> |
#<alt (+ (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))> |
#<alt (+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))))> |
#<alt (+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))> |
#<alt (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))> |
#<alt (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))> |
#<alt (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))))> |
#<alt (* -1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))> |
#<alt (* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))> |
#<alt (* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))))> |
#<alt (* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))))> |
#<alt (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))> |
#<alt (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))))))) (* b (sqrt 2)))) (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))))> |
#<alt (+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))))) (* b (sqrt 2)))))))> |
#<alt (+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))))) (* b (sqrt 2)))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))))) (* 1/2 (/ (* (pow x-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2)))))))) (* b (sqrt 2)))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))> |
#<alt (* 4 y-scale)> |
#<alt (* 4 y-scale)> |
#<alt (* 4 y-scale)> |
#<alt (* 4 y-scale)> |
#<alt (* 4 y-scale)> |
#<alt (* 4 y-scale)> |
#<alt (* 4 y-scale)> |
#<alt (* 4 y-scale)> |
#<alt (* 4 y-scale)> |
#<alt (* 4 y-scale)> |
#<alt (* 4 y-scale)> |
#<alt (* 4 y-scale)> |
#<alt (* 1/4 b)> |
#<alt (* 1/4 b)> |
#<alt (* 1/4 b)> |
#<alt (* 1/4 b)> |
#<alt (* 1/4 b)> |
#<alt (* 1/4 b)> |
#<alt (* 1/4 b)> |
#<alt (* 1/4 b)> |
#<alt (* 1/4 b)> |
#<alt (* 1/4 b)> |
#<alt (* 1/4 b)> |
#<alt (* 1/4 b)> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))> |
#<alt (+ (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))> |
#<alt (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))))> |
#<alt (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))))))> |
#<alt (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))> |
#<alt (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))> |
#<alt (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))))> |
#<alt (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))))> |
#<alt (* -1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))> |
#<alt (* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))))> |
#<alt (* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))))> |
#<alt (* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))> |
#<alt (+ (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))> |
#<alt (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))))> |
#<alt (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))))))> |
#<alt (* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))> |
#<alt (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))> |
#<alt (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))> |
#<alt (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))))> |
#<alt (* -1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))> |
#<alt (* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))> |
#<alt (* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))))> |
#<alt (* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))))> |
#<alt (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))> |
#<alt (+ (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))> |
#<alt (+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))))> |
#<alt (+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))> |
#<alt (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))> |
#<alt (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))> |
#<alt (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))))> |
#<alt (* -1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))> |
#<alt (* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))> |
#<alt (* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))))> |
#<alt (* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))))> |
#<alt (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))> |
#<alt (+ (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))> |
#<alt (+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))))> |
#<alt (+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))> |
#<alt (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))> |
#<alt (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))> |
#<alt (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))))> |
#<alt (* -1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))> |
#<alt (* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))> |
#<alt (* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))))> |
#<alt (* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))))> |
#<alt (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))> |
#<alt (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))))))) (* b (sqrt 2)))) (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))))> |
#<alt (+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))))) (* b (sqrt 2)))))))> |
#<alt (+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))))) (* b (sqrt 2)))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))))) (* 1/2 (/ (* (pow x-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2)))))))) (* b (sqrt 2)))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))> |
#<alt (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))> |
#<alt (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))> |
#<alt (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))> |
#<alt (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))> |
#<alt (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))> |
#<alt (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))> |
#<alt (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))> |
#<alt (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))> |
#<alt (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))> |
#<alt (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))> |
#<alt (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))> |
#<alt (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))> |
#<alt (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))> |
#<alt (+ (* 1/8 (/ (* (pow angle 2) (* y-scale (* (sqrt 2) (* (sqrt 8) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))))))) b)) (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))))> |
#<alt (+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* y-scale (* (sqrt 2) (* (sqrt 8) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))))) b)) (* 1/8 (/ (* (pow angle 2) (* y-scale (* (sqrt 2) (* (sqrt 8) (- (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (* 1/4 (/ (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2) (pow b 2)))))))) b)))))> |
#<alt (+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* y-scale (* (sqrt 2) (* (sqrt 8) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))))) b)) (* (pow angle 2) (+ (* 1/8 (/ (* y-scale (* (sqrt 2) (* (sqrt 8) (- (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (* 1/4 (/ (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2) (pow b 2))))))) b)) (* 1/8 (/ (* (pow angle 2) (* y-scale (* (sqrt 2) (* (sqrt 8) (- (+ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6))))) (* 1/2 (/ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (- (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (* 1/4 (/ (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2) (pow b 2))))) (pow b 2)))))))) b)))))))> |
#<alt (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))> |
#<alt (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))> |
#<alt (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))> |
#<alt (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))> |
#<alt (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))> |
#<alt (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))> |
#<alt (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))> |
#<alt (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))> |
#<alt (* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))> |
#<alt (+ (* 1/8 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* a (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))> |
#<alt (+ (* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (* (pow b 2) (+ (* -1/32 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow a 3) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* 1/8 (/ (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (* a (sin (* 1/180 (* angle (PI))))))))))> |
#<alt (+ (* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (* (pow b 2) (+ (* 1/8 (/ (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (* a (sin (* 1/180 (* angle (PI))))))) (* (pow b 2) (+ (* -1/32 (/ (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8)))) (* (pow a 3) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* 1/64 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 6) (* (sqrt 2) (sqrt 8))))) (* (pow a 5) (pow (sin (* 1/180 (* angle (PI)))) 5)))))))))> |
#<alt (* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))> |
#<alt (* b (+ (* 1/8 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))> |
#<alt (* b (+ (* -1/32 (/ (* (pow a 4) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/8 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))> |
#<alt (* b (+ (* -1/32 (/ (* (pow a 4) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/64 (/ (* (pow a 6) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 6) (* (sqrt 2) (sqrt 8))))) (* (pow b 6) (pow (cos (* 1/180 (* angle (PI)))) 5)))) (+ (* 1/8 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))))> |
#<alt (* -1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))> |
#<alt (* -1 (* b (+ (* 1/8 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))> |
#<alt (* -1 (* b (+ (* -1/32 (/ (* (pow a 4) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/8 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))))> |
#<alt (* -1 (* b (+ (* -1/32 (/ (* (pow a 4) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/64 (/ (* (pow a 6) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 6) (* (sqrt 2) (sqrt 8))))) (* (pow b 6) (pow (cos (* 1/180 (* angle (PI)))) 5)))) (+ (* 1/8 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))))> |
#<alt (* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))> |
#<alt (+ (* 1/8 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* b (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))> |
#<alt (+ (* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (* (pow a 2) (+ (* -1/32 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow b 3) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (* 1/8 (/ (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (* b (cos (* 1/180 (* angle (PI))))))))))> |
#<alt (+ (* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (* (pow a 2) (+ (* 1/8 (/ (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (* b (cos (* 1/180 (* angle (PI))))))) (* (pow a 2) (+ (* -1/32 (/ (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8)))) (* (pow b 3) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (* 1/64 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 6) (* (sqrt 2) (sqrt 8))))) (* (pow b 5) (pow (cos (* 1/180 (* angle (PI)))) 5)))))))))> |
#<alt (* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))> |
#<alt (* a (+ (* 1/8 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))> |
#<alt (* a (+ (* -1/32 (/ (* (pow b 4) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/8 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))> |
#<alt (* a (+ (* -1/32 (/ (* (pow b 4) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/64 (/ (* (pow b 6) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 6) (* (sqrt 2) (sqrt 8))))) (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 5)))) (+ (* 1/8 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))))> |
#<alt (* -1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))> |
#<alt (* -1 (* a (+ (* 1/8 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))> |
#<alt (* -1 (* a (+ (* -1/32 (/ (* (pow b 4) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/8 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))))> |
#<alt (* -1 (* a (+ (* -1/32 (/ (* (pow b 4) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/64 (/ (* (pow b 6) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 6) (* (sqrt 2) (sqrt 8))))) (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 5)))) (+ (* 1/8 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))))> |
#<alt (* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))> |
#<alt (* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))> |
#<alt (* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))> |
#<alt (* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))> |
#<alt (* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))> |
#<alt (* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))> |
#<alt (* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))> |
#<alt (* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))> |
#<alt (* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))> |
#<alt (* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))> |
#<alt (* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))> |
#<alt (* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))> |
#<alt (* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))> |
#<alt (* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))> |
#<alt (* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))> |
#<alt (* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))> |
#<alt (* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))> |
#<alt (* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))> |
#<alt (* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))> |
#<alt (* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))> |
#<alt (* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))> |
#<alt (* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))> |
#<alt (* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))> |
#<alt (* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))> |
#<alt (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))> |
#<alt (+ (* -1/259200 (* (pow angle 2) (* b (* y-scale (* (pow (PI) 2) (* (sqrt 2) (sqrt 8))))))) (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))))> |
#<alt (+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* -1/259200 (* b (* y-scale (* (pow (PI) 2) (* (sqrt 2) (sqrt 8)))))) (* 1/100776960000 (* (pow angle 2) (* b (* y-scale (* (pow (PI) 4) (* (sqrt 2) (sqrt 8))))))))))> |
#<alt (+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* -1/259200 (* b (* y-scale (* (pow (PI) 2) (* (sqrt 2) (sqrt 8)))))) (* (pow angle 2) (+ (* -1/97955205120000000 (* (pow angle 2) (* b (* y-scale (* (pow (PI) 6) (* (sqrt 2) (sqrt 8))))))) (* 1/100776960000 (* b (* y-scale (* (pow (PI) 4) (* (sqrt 2) (sqrt 8)))))))))))> |
#<alt (* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))> |
#<alt (* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))> |
#<alt (* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))> |
#<alt (* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))> |
#<alt (* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))> |
#<alt (* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))> |
#<alt (* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))> |
#<alt (* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))> |
#<alt (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))> |
#<alt (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))> |
#<alt (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))> |
#<alt (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))> |
#<alt (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))> |
#<alt (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))> |
#<alt (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))> |
#<alt (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))> |
#<alt (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))> |
#<alt (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))> |
#<alt (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))> |
#<alt (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))> |
#<alt (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))> |
#<alt (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))> |
#<alt (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))> |
#<alt (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))> |
#<alt (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))> |
#<alt (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))> |
#<alt (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))> |
#<alt (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))> |
#<alt (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))> |
#<alt (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))> |
#<alt (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))> |
#<alt (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))> |
#<alt (* b (* y-scale (* (sqrt 2) (sqrt 8))))> |
#<alt (+ (* -1/64800 (* (pow angle 2) (* b (* y-scale (* (pow (PI) 2) (* (sqrt 2) (sqrt 8))))))) (* b (* y-scale (* (sqrt 2) (sqrt 8)))))> |
#<alt (+ (* b (* y-scale (* (sqrt 2) (sqrt 8)))) (* (pow angle 2) (+ (* -1/64800 (* b (* y-scale (* (pow (PI) 2) (* (sqrt 2) (sqrt 8)))))) (* 1/25194240000 (* (pow angle 2) (* b (* y-scale (* (pow (PI) 4) (* (sqrt 2) (sqrt 8))))))))))> |
#<alt (+ (* b (* y-scale (* (sqrt 2) (sqrt 8)))) (* (pow angle 2) (+ (* -1/64800 (* b (* y-scale (* (pow (PI) 2) (* (sqrt 2) (sqrt 8)))))) (* (pow angle 2) (+ (* -1/24488801280000000 (* (pow angle 2) (* b (* y-scale (* (pow (PI) 6) (* (sqrt 2) (sqrt 8))))))) (* 1/25194240000 (* b (* y-scale (* (pow (PI) 4) (* (sqrt 2) (sqrt 8)))))))))))> |
#<alt (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))> |
#<alt (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))> |
#<alt (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))> |
#<alt (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))> |
#<alt (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))> |
#<alt (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))> |
#<alt (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))> |
#<alt (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))> |
#<alt (/ 1/4 (* (pow a 2) (pow b 2)))> |
#<alt (/ 1/4 (* (pow a 2) (pow b 2)))> |
#<alt (/ 1/4 (* (pow a 2) (pow b 2)))> |
#<alt (/ 1/4 (* (pow a 2) (pow b 2)))> |
#<alt (/ 1/4 (* (pow a 2) (pow b 2)))> |
#<alt (/ 1/4 (* (pow a 2) (pow b 2)))> |
#<alt (/ 1/4 (* (pow a 2) (pow b 2)))> |
#<alt (/ 1/4 (* (pow a 2) (pow b 2)))> |
#<alt (/ 1/4 (* (pow a 2) (pow b 2)))> |
#<alt (/ 1/4 (* (pow a 2) (pow b 2)))> |
#<alt (/ 1/4 (* (pow a 2) (pow b 2)))> |
#<alt (/ 1/4 (* (pow a 2) (pow b 2)))> |
#<alt (/ 1/4 (* (pow a 2) (pow b 2)))> |
#<alt (/ 1/4 (* (pow a 2) (pow b 2)))> |
#<alt (/ 1/4 (* (pow a 2) (pow b 2)))> |
#<alt (/ 1/4 (* (pow a 2) (pow b 2)))> |
#<alt (/ 1/4 (* (pow a 2) (pow b 2)))> |
#<alt (/ 1/4 (* (pow a 2) (pow b 2)))> |
#<alt (/ 1/4 (* (pow a 2) (pow b 2)))> |
#<alt (/ 1/4 (* (pow a 2) (pow b 2)))> |
#<alt (/ 1/4 (* (pow a 2) (pow b 2)))> |
#<alt (/ 1/4 (* (pow a 2) (pow b 2)))> |
#<alt (/ 1/4 (* (pow a 2) (pow b 2)))> |
#<alt (/ 1/4 (* (pow a 2) (pow b 2)))> |
#<alt (* -4 (* (pow a 2) (pow b 2)))> |
#<alt (* -4 (* (pow a 2) (pow b 2)))> |
#<alt (* -4 (* (pow a 2) (pow b 2)))> |
#<alt (* -4 (* (pow a 2) (pow b 2)))> |
#<alt (* -4 (* (pow a 2) (pow b 2)))> |
#<alt (* -4 (* (pow a 2) (pow b 2)))> |
#<alt (* -4 (* (pow a 2) (pow b 2)))> |
#<alt (* -4 (* (pow a 2) (pow b 2)))> |
#<alt (* -4 (* (pow a 2) (pow b 2)))> |
#<alt (* -4 (* (pow a 2) (pow b 2)))> |
#<alt (* -4 (* (pow a 2) (pow b 2)))> |
#<alt (* -4 (* (pow a 2) (pow b 2)))> |
#<alt (* -4 (* (pow a 2) (pow b 2)))> |
#<alt (* -4 (* (pow a 2) (pow b 2)))> |
#<alt (* -4 (* (pow a 2) (pow b 2)))> |
#<alt (* -4 (* (pow a 2) (pow b 2)))> |
#<alt (* -4 (* (pow a 2) (pow b 2)))> |
#<alt (* -4 (* (pow a 2) (pow b 2)))> |
#<alt (* -4 (* (pow a 2) (pow b 2)))> |
#<alt (* -4 (* (pow a 2) (pow b 2)))> |
#<alt (* -4 (* (pow a 2) (pow b 2)))> |
#<alt (* -4 (* (pow a 2) (pow b 2)))> |
#<alt (* -4 (* (pow a 2) (pow b 2)))> |
#<alt (* -4 (* (pow a 2) (pow b 2)))> |
#<alt (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))> |
#<alt (+ (* (pow a 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))> |
#<alt (+ (* (pow a 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))> |
#<alt (+ (* (pow a 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))> |
#<alt (* (pow a 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2)))))> |
#<alt (* (pow a 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) (pow x-scale 2))))))> |
#<alt (* (pow a 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) (pow x-scale 2))))))> |
#<alt (* (pow a 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) (pow x-scale 2))))))> |
#<alt (* (pow a 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2)))))> |
#<alt (* (pow a 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) (pow x-scale 2))))))> |
#<alt (* (pow a 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) (pow x-scale 2))))))> |
#<alt (* (pow a 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) (pow x-scale 2))))))> |
#<alt (/ (pow b 2) (pow x-scale 2))> |
#<alt (+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))))) (/ (pow b 2) (pow x-scale 2)))> |
#<alt (+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))))))) (/ (pow b 2) (pow x-scale 2)))> |
#<alt (+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2))) (* (pow angle 2) (+ (* -1/765275040000000 (/ (* (pow b 2) (pow (PI) 6)) (pow x-scale 2))) (* 1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow x-scale 2))))))))))) (/ (pow b 2) (pow x-scale 2)))> |
#<alt (+ (/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))> |
#<alt (+ (/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))> |
#<alt (+ (/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))> |
#<alt (+ (/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))> |
#<alt (+ (/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))> |
#<alt (+ (/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))> |
#<alt (+ (/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))> |
#<alt (+ (/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))> |
#<alt (/ (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow x-scale 2))> |
#<alt (/ (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow x-scale 2))> |
#<alt (/ (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow x-scale 2))> |
#<alt (/ (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow x-scale 2))> |
#<alt (/ (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow x-scale 2))> |
#<alt (/ (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow x-scale 2))> |
#<alt (/ (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow x-scale 2))> |
#<alt (/ (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow x-scale 2))> |
#<alt (/ (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow x-scale 2))> |
#<alt (/ (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow x-scale 2))> |
#<alt (/ (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow x-scale 2))> |
#<alt (/ (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow x-scale 2))> |
#<alt (/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))> |
#<alt (+ (* (pow b 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))> |
#<alt (+ (* (pow b 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))> |
#<alt (+ (* (pow b 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))> |
#<alt (* (pow b 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2)))))> |
#<alt (* (pow b 2) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (pow x-scale 2))))))> |
#<alt (* (pow b 2) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (pow x-scale 2))))))> |
#<alt (* (pow b 2) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (pow x-scale 2))))))> |
#<alt (* (pow b 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2)))))> |
#<alt (* (pow b 2) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (pow x-scale 2))))))> |
#<alt (* (pow b 2) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (pow x-scale 2))))))> |
#<alt (* (pow b 2) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (pow x-scale 2))))))> |
#<alt (* 1/32400 (* (pow angle 2) (pow (PI) 2)))> |
#<alt (* (pow angle 2) (+ (* -1/3149280000 (* (pow angle 2) (pow (PI) 4))) (* 1/32400 (pow (PI) 2))))> |
#<alt (* (pow angle 2) (+ (* 1/32400 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/3149280000 (pow (PI) 4)) (* 1/765275040000000 (* (pow angle 2) (pow (PI) 6)))))))> |
#<alt (* (pow angle 2) (+ (* 1/32400 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/3149280000 (pow (PI) 4)) (* (pow angle 2) (+ (* -1/347128758144000000000 (* (pow angle 2) (pow (PI) 8))) (* 1/765275040000000 (pow (PI) 6))))))))> |
#<alt (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))> |
#<alt (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))> |
#<alt (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))> |
#<alt (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))> |
#<alt (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))> |
#<alt (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))> |
#<alt (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))> |
#<alt (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))> |
#<alt (* 2 (pow (cos (* 1/180 (* angle (PI)))) 2))> |
#<alt (* 2 (pow (cos (* 1/180 (* angle (PI)))) 2))> |
#<alt (* 2 (pow (cos (* 1/180 (* angle (PI)))) 2))> |
#<alt (* 2 (pow (cos (* 1/180 (* angle (PI)))) 2))> |
#<alt (* 2 (pow (cos (* 1/180 (* angle (PI)))) 2))> |
#<alt (* 2 (pow (cos (* 1/180 (* angle (PI)))) 2))> |
#<alt (* 2 (pow (cos (* 1/180 (* angle (PI)))) 2))> |
#<alt (* 2 (pow (cos (* 1/180 (* angle (PI)))) 2))> |
#<alt (* 2 (pow (cos (* 1/180 (* angle (PI)))) 2))> |
#<alt (* 2 (pow (cos (* 1/180 (* angle (PI)))) 2))> |
#<alt (* 2 (pow (cos (* 1/180 (* angle (PI)))) 2))> |
#<alt (* 2 (pow (cos (* 1/180 (* angle (PI)))) 2))> |
#<alt 2> |
#<alt (+ 2 (* -1/16200 (* (pow angle 2) (pow (PI) 2))))> |
#<alt (+ 2 (* (pow angle 2) (+ (* -1/16200 (pow (PI) 2)) (* 2 (* (pow angle 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))> |
#<alt (+ 2 (* (pow angle 2) (+ (* -1/16200 (pow (PI) 2)) (* (pow angle 2) (+ (* 2 (* (pow angle 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6))))) (* 2 (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))))))> |
#<alt (* 2 (pow (cos (* 1/180 (* angle (PI)))) 2))> |
#<alt (* 2 (pow (cos (* 1/180 (* angle (PI)))) 2))> |
#<alt (* 2 (pow (cos (* 1/180 (* angle (PI)))) 2))> |
#<alt (* 2 (pow (cos (* 1/180 (* angle (PI)))) 2))> |
#<alt (* 2 (pow (cos (* 1/180 (* angle (PI)))) 2))> |
#<alt (* 2 (pow (cos (* 1/180 (* angle (PI)))) 2))> |
#<alt (* 2 (pow (cos (* 1/180 (* angle (PI)))) 2))> |
#<alt (* 2 (pow (cos (* 1/180 (* angle (PI)))) 2))> |
#<alt (* -1 (* b (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))))))> |
#<alt (* -1 (* b (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))))))> |
#<alt (* -1 (* b (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))))))> |
#<alt (* -1 (* b (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))))))> |
#<alt (* -1 (* b (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))))))> |
#<alt (* -1 (* b (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))))))> |
#<alt (* -1 (* b (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))))))> |
#<alt (* -1 (* b (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))))))> |
#<alt (* -1 (* b (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))))))> |
#<alt (* -1 (* b (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))))))> |
#<alt (* -1 (* b (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))))))> |
#<alt (* -1 (* b (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))))))> |
#<alt (* -1/4 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))> |
#<alt (- (* -1/4 (/ (* b (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))> |
#<alt (- (* -1/4 (/ (* b (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))> |
#<alt (- (* -1/4 (/ (* b (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))> |
#<alt (* -1/4 (/ (* b (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))> |
#<alt (* (pow y-scale 2) (- (* -1/4 (/ (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (pow y-scale 2))) (* 1/4 (/ (* b (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))))> |
#<alt (* (pow y-scale 2) (- (* -1/4 (/ (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (pow y-scale 2))) (* 1/4 (/ (* b (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))))> |
#<alt (* (pow y-scale 2) (- (* -1/4 (/ (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (pow y-scale 2))) (* 1/4 (/ (* b (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))))> |
#<alt (* -1/4 (/ (* b (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))> |
#<alt (* (pow y-scale 2) (- (* -1/4 (/ (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (pow y-scale 2))) (* 1/4 (/ (* b (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))))> |
#<alt (* (pow y-scale 2) (- (* -1/4 (/ (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (pow y-scale 2))) (* 1/4 (/ (* b (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))))> |
#<alt (* (pow y-scale 2) (- (* -1/4 (/ (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (pow y-scale 2))) (* 1/4 (/ (* b (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))))> |
#<alt (* -45 (/ (* b (* (pow y-scale 2) (* (sqrt 1/2) (sqrt 8)))) (* angle (* (pow x-scale 2) (PI)))))> |
#<alt (/ (- (* -1 (* (pow angle 2) (* b (+ (* 1/720 (* (PI) (* (sqrt 2) (sqrt 8)))) (* 1/4 (- (* -1/180 (/ (* (pow y-scale 2) (* (PI) (* (sqrt 1/2) (sqrt 8)))) (pow x-scale 2))) (* -1/1080 (/ (* (pow y-scale 2) (* (PI) (* (sqrt 1/2) (sqrt 8)))) (pow x-scale 2))))))))) (* 45 (/ (* b (* (pow y-scale 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow x-scale 2) (PI))))) angle)> |
#<alt (/ (- (* (pow angle 2) (- (* -1 (* (pow angle 2) (* b (+ (* -1/139968000 (* (pow (PI) 3) (* (sqrt 2) (sqrt 8)))) (* 1/4 (- (* 180 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (PI)))) (+ (* -1/194400 (* (pow (PI) 2) (- (* -1/180 (/ (* (pow y-scale 2) (* (PI) (* (sqrt 1/2) (sqrt 8)))) (pow x-scale 2))) (* -1/1080 (/ (* (pow y-scale 2) (* (PI) (* (sqrt 1/2) (sqrt 8)))) (pow x-scale 2)))))) (* 1/699840000 (/ (* (pow y-scale 2) (* (pow (PI) 3) (* (sqrt 1/2) (sqrt 8)))) (pow x-scale 2)))))))))) (* b (+ (* 1/720 (* (PI) (* (sqrt 2) (sqrt 8)))) (* 1/4 (- (* -1/180 (/ (* (pow y-scale 2) (* (PI) (* (sqrt 1/2) (sqrt 8)))) (pow x-scale 2))) (* -1/1080 (/ (* (pow y-scale 2) (* (PI) (* (sqrt 1/2) (sqrt 8)))) (pow x-scale 2))))))))) (* 45 (/ (* b (* (pow y-scale 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow x-scale 2) (PI))))) angle)> |
#<alt (/ (- (* (pow angle 2) (- (* (pow angle 2) (- (* -1 (* (pow angle 2) (* b (+ (* 1/90699264000000 (* (pow (PI) 5) (* (sqrt 2) (sqrt 8)))) (* 1/4 (- (* 180 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))))) (* (pow x-scale 2) (PI)))) (+ (* -1/194400 (* (pow (PI) 2) (- (* 180 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (PI)))) (+ (* -1/194400 (* (pow (PI) 2) (- (* -1/180 (/ (* (pow y-scale 2) (* (PI) (* (sqrt 1/2) (sqrt 8)))) (pow x-scale 2))) (* -1/1080 (/ (* (pow y-scale 2) (* (PI) (* (sqrt 1/2) (sqrt 8)))) (pow x-scale 2)))))) (* 1/699840000 (/ (* (pow y-scale 2) (* (pow (PI) 3) (* (sqrt 1/2) (sqrt 8)))) (pow x-scale 2))))))) (+ (* -1/952342272000000 (/ (* (pow y-scale 2) (* (pow (PI) 5) (* (sqrt 1/2) (sqrt 8)))) (pow x-scale 2))) (* 1/125971200000 (* (pow (PI) 4) (- (* -1/180 (/ (* (pow y-scale 2) (* (PI) (* (sqrt 1/2) (sqrt 8)))) (pow x-scale 2))) (* -1/1080 (/ (* (pow y-scale 2) (* (PI) (* (sqrt 1/2) (sqrt 8)))) (pow x-scale 2)))))))))))))) (* b (+ (* -1/139968000 (* (pow (PI) 3) (* (sqrt 2) (sqrt 8)))) (* 1/4 (- (* 180 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (PI)))) (+ (* -1/194400 (* (pow (PI) 2) (- (* -1/180 (/ (* (pow y-scale 2) (* (PI) (* (sqrt 1/2) (sqrt 8)))) (pow x-scale 2))) (* -1/1080 (/ (* (pow y-scale 2) (* (PI) (* (sqrt 1/2) (sqrt 8)))) (pow x-scale 2)))))) (* 1/699840000 (/ (* (pow y-scale 2) (* (pow (PI) 3) (* (sqrt 1/2) (sqrt 8)))) (pow x-scale 2)))))))))) (* b (+ (* 1/720 (* (PI) (* (sqrt 2) (sqrt 8)))) (* 1/4 (- (* -1/180 (/ (* (pow y-scale 2) (* (PI) (* (sqrt 1/2) (sqrt 8)))) (pow x-scale 2))) (* -1/1080 (/ (* (pow y-scale 2) (* (PI) (* (sqrt 1/2) (sqrt 8)))) (pow x-scale 2))))))))) (* 45 (/ (* b (* (pow y-scale 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow x-scale 2) (PI))))) angle)> |
#<alt (* -1 (* b (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))))))> |
#<alt (* -1 (* b (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))))))> |
#<alt (* -1 (* b (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))))))> |
#<alt (* -1 (* b (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))))))> |
#<alt (* -1 (* b (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))))))> |
#<alt (* -1 (* b (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))))))> |
#<alt (* -1 (* b (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))))))> |
#<alt (* -1 (* b (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))))))> |
#<alt (* -1/4 (/ (* b (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))> |
#<alt (/ (- (* -1/4 (* b (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (* 1/4 (/ (* b (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (sin (* 1/180 (* angle (PI))))))) (pow x-scale 2))> |
#<alt (/ (- (* -1/4 (* b (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (* 1/4 (/ (* b (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (sin (* 1/180 (* angle (PI))))))) (pow x-scale 2))> |
#<alt (/ (- (* -1/4 (* b (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (* 1/4 (/ (* b (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (sin (* 1/180 (* angle (PI))))))) (pow x-scale 2))> |
#<alt (* -1/4 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))> |
#<alt (- (* -1/4 (/ (* b (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))> |
#<alt (- (* -1/4 (/ (* b (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))> |
#<alt (- (* -1/4 (/ (* b (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))> |
#<alt (* -1/4 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))> |
#<alt (- (* -1/4 (/ (* b (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))> |
#<alt (- (* -1/4 (/ (* b (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))> |
#<alt (- (* -1/4 (/ (* b (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))> |
#<alt (+ (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))> |
#<alt (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))))> |
#<alt (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))))))> |
#<alt (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))> |
#<alt (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))> |
#<alt (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))))> |
#<alt (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))))> |
#<alt (* -1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))> |
#<alt (* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))))> |
#<alt (* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))))> |
#<alt (* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))> |
#<alt (+ (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))> |
#<alt (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))))> |
#<alt (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))))))> |
#<alt (* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))> |
#<alt (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))> |
#<alt (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))> |
#<alt (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))))> |
#<alt (* -1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))> |
#<alt (* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))> |
#<alt (* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))))> |
#<alt (* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))))> |
#<alt (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))> |
#<alt (+ (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))> |
#<alt (+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))))> |
#<alt (+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))> |
#<alt (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))> |
#<alt (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))> |
#<alt (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))))> |
#<alt (* -1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))> |
#<alt (* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))> |
#<alt (* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))))> |
#<alt (* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))))> |
#<alt (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))> |
#<alt (+ (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))> |
#<alt (+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))))> |
#<alt (+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))> |
#<alt (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))> |
#<alt (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))> |
#<alt (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))))> |
#<alt (* -1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))> |
#<alt (* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))> |
#<alt (* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))))> |
#<alt (* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))))> |
#<alt (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))> |
#<alt (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))))))) (* b (sqrt 2)))) (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))))> |
#<alt (+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))))) (* b (sqrt 2)))))))> |
#<alt (+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))))) (* b (sqrt 2)))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))))) (* 1/2 (/ (* (pow x-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2)))))))) (* b (sqrt 2)))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))> |
#<alt (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) x-scale) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))> |
#<alt (/ (+ (* 1/8 (* (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* (pow x-scale 2) (* y-scale (* (sqrt 2) (sqrt 8)))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) x-scale)> |
#<alt (/ (+ (* 1/8 (* (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* (pow x-scale 2) (* y-scale (* (sqrt 2) (sqrt 8)))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) x-scale)> |
#<alt (/ (+ (* 1/8 (* (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* (pow x-scale 2) (* y-scale (* (sqrt 2) (sqrt 8)))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) x-scale)> |
#<alt (* 1/4 (* (* x-scale (* y-scale (* (sqrt 2) (sqrt 8)))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))> |
#<alt (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))> |
#<alt (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))> |
#<alt (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (* (sqrt 2) (sqrt 8)))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))> |
#<alt (* -1 (* x-scale (+ (* -1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* -1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))> |
#<alt (* -1 (* x-scale (+ (* -1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* -1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))> |
#<alt (* -1 (* x-scale (+ (* -1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* -1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))> |
#<alt (* 1/4 (* (* x-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))> |
#<alt (+ (* 1/8 (* (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) x-scale) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* 1/4 (* (* x-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))> |
#<alt (+ (* 1/8 (* (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) x-scale) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* 1/4 (* (* x-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))> |
#<alt (+ (* 1/8 (* (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) x-scale) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* 1/4 (* (* x-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))> |
#<alt (* 1/8 (* (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) x-scale) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))> |
#<alt (* (pow y-scale 2) (+ (* 1/8 (* (/ (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) x-scale) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* 1/4 (* (/ (* x-scale (* (sqrt 2) (sqrt 8))) (pow y-scale 2)) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))> |
#<alt (* (pow y-scale 2) (+ (* 1/8 (* (/ (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) x-scale) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* 1/4 (* (/ (* x-scale (* (sqrt 2) (sqrt 8))) (pow y-scale 2)) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))> |
#<alt (* (pow y-scale 2) (+ (* 1/8 (* (/ (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) x-scale) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* 1/4 (* (/ (* x-scale (* (sqrt 2) (sqrt 8))) (pow y-scale 2)) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))> |
#<alt (* -1/8 (* (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) x-scale) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))> |
#<alt (* (pow y-scale 2) (+ (* -1/4 (* (/ (* x-scale (* (sqrt 2) (sqrt 8))) (pow y-scale 2)) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* -1/8 (* (/ (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) x-scale) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))> |
#<alt (* (pow y-scale 2) (+ (* -1/4 (* (/ (* x-scale (* (sqrt 2) (sqrt 8))) (pow y-scale 2)) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* -1/8 (* (/ (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) x-scale) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))> |
#<alt (* (pow y-scale 2) (+ (* -1/4 (* (/ (* x-scale (* (sqrt 2) (sqrt 8))) (pow y-scale 2)) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* -1/8 (* (/ (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) x-scale) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))> |
#<alt (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (* 1/4 (* a (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))> |
#<alt (+ (* 1/4 (/ (* b (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))))))) (* (pow a 3) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (* 1/4 (* a (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))> |
#<alt (+ (* b (+ (* 1/4 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))))) (* (pow a 3) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (* b (* x-scale (+ (* 1/8 (+ (* -1/2 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow a 3) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 3))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))))) (* 1/8 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))) (* a (cos (* 1/180 (* angle (PI)))))))))))) (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (* 1/4 (* a (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))> |
#<alt (+ (* b (+ (* 1/4 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))))) (* (pow a 3) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (* b (+ (* 1/8 (* b (* x-scale (+ (* -1 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))))) (* (pow a 5) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 3))))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (pow a 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))))))) (* x-scale (+ (* 1/8 (+ (* -1/2 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow a 3) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 3))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))))) (* 1/8 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))) (* a (cos (* 1/180 (* angle (PI))))))))))))) (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (* 1/4 (* a (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))> |
#<alt (* b (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))> |
#<alt (* b (+ (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))))) (* b (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))> |
#<alt (* b (+ (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))))) (* b (* x-scale (sin (* 1/180 (* angle (PI)))))))) (+ (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (/ (* x-scale (+ (* 1/8 (+ (* -1/2 (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2)))))> |
#<alt (* b (+ (* 1/8 (/ (* x-scale (+ (* -1 (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 a) (* 2 a))))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* 4 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (+ (* -2 a) (* 2 a)))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))))) (pow b 3))) (+ (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))))) (* b (* x-scale (sin (* 1/180 (* angle (PI)))))))) (+ (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (/ (* x-scale (+ (* 1/8 (+ (* -1/2 (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))))> |
#<alt (* -1 (* b (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))> |
#<alt (* -1 (* b (+ (* -1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))))) (* b (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))))> |
#<alt (* -1 (* b (+ (* -1 (/ (+ (* -1 (/ (* x-scale (+ (* 1/8 (+ (* -1/2 (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (sin (* 1/180 (* angle (PI)))))))) b)) (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))) b)) (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))))> |
#<alt (* -1 (* b (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (/ (* x-scale (+ (* -1 (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 a) (* 2 a))))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* 4 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (+ (* -2 a) (* 2 a)))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))))) b)) (* x-scale (+ (* 1/8 (+ (* -1/2 (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (sin (* 1/180 (* angle (PI))))))))) b)) (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))) b)) (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))))> |
#<alt (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (pow b 2)) (pow b 2))))) (* a (pow x-scale 2)))) (* 1/4 (* a (* (sqrt 2) (sqrt 8))))))> |
#<alt (+ (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (pow b 2)) (pow b 2))))) (* a (pow x-scale 2)))) (* 1/4 (* a (* (sqrt 2) (sqrt 8)))))) (* (pow angle 2) (* x-scale (+ (* 1/8 (+ (* -1/2 (/ (* (pow y-scale 4) (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1 (pow b 2)) (pow b 2)) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))))) (* (pow a 3) (pow x-scale 2)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))))))) (* a (pow x-scale 2))))) (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 2) (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))))) a))))))> |
#<alt (+ (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (pow b 2)) (pow b 2))))) (* a (pow x-scale 2)))) (* 1/4 (* a (* (sqrt 2) (sqrt 8)))))) (* (pow angle 2) (+ (* x-scale (+ (* 1/8 (+ (* -1/2 (/ (* (pow y-scale 4) (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1 (pow b 2)) (pow b 2)) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))))) (* (pow a 3) (pow x-scale 2)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))))))) (* a (pow x-scale 2))))) (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 2) (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))))) a)))) (* (pow angle 2) (* x-scale (+ (* 1/8 (+ (* -1/2 (/ (* a (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (+ (* 1/4 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (/ (* (pow y-scale 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (pow a 4)))) (+ (* -1 (pow b 2)) (pow b 2)))))) (pow x-scale 2))) (+ (* -1/2 (/ (* (pow y-scale 4) (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2))))))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))))) (* (pow a 3) (pow x-scale 2)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (+ (* (pow b 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 2))))) (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))))) (pow a 2)) (+ (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))) (pow a 2))) (/ (* (pow y-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))) (pow a 2))))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))) (* a (pow x-scale 2)))))) (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 2) (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 2))))))) a))))))))> |
#<alt (+ (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (pow b 2)) (pow b 2))))) (* a (pow x-scale 2)))) (* 1/4 (* a (* (sqrt 2) (sqrt 8)))))) (* (pow angle 2) (+ (* x-scale (+ (* 1/8 (+ (* -1/2 (/ (* (pow y-scale 4) (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1 (pow b 2)) (pow b 2)) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))))) (* (pow a 3) (pow x-scale 2)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))))))) (* a (pow x-scale 2))))) (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 2) (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))))) a)))) (* (pow angle 2) (+ (* x-scale (+ (* 1/8 (+ (* -1/2 (/ (* a (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (+ (* 1/4 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (/ (* (pow y-scale 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (pow a 4)))) (+ (* -1 (pow b 2)) (pow b 2)))))) (pow x-scale 2))) (+ (* -1/2 (/ (* (pow y-scale 4) (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2))))))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))))) (* (pow a 3) (pow x-scale 2)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (+ (* (pow b 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 2))))) (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))))) (pow a 2)) (+ (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))) (pow a 2))) (/ (* (pow y-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))) (pow a 2))))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))) (* a (pow x-scale 2)))))) (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 2) (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 2))))))) a)))) (* (pow angle 2) (* x-scale (+ (* 1/8 (+ (* -1/2 (/ (* a (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1 (/ (* (pow y-scale 2) (* (+ (* -1 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (/ (* (pow y-scale 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (pow a 4))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2))) (+ (* -1 (/ (* (pow y-scale 6) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))) (pow a 6))) (+ (* 1/2 (/ (* (pow y-scale 2) (* (+ (* -1 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (+ (* 1/4 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (/ (* (pow y-scale 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (pow a 4)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2))) (/ (* (pow y-scale 4) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (pow a 4))))) (+ (* -1 (pow b 2)) (pow b 2)))))) (pow x-scale 2))) (+ (* -1/2 (/ (* a (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (+ (* 1/4 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (/ (* (pow y-scale 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (pow a 4)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2))))))))))) (pow x-scale 2))) (+ (* -1/2 (/ (* (pow y-scale 4) (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (+ (* (pow b 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 2))))) (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))))) (pow a 2)) (+ (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))) (pow a 2))) (/ (* (pow y-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))) (pow a 2))))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))))))) (* (pow a 3) (pow x-scale 2)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (+ (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (+ (* (pow b 2) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))))) (pow y-scale 2)))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- b a) 2)))) (pow y-scale 2))) (/ (* (pow (+ a b) 2) (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- b a) 2))) (pow y-scale 2))))))) (pow a 2)) (+ (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))))) (pow a 2))) (+ (/ (* (pow y-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (+ (* (pow b 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 2))))) (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))))) (pow a 2)) (+ (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))) (pow a 2))) (/ (* (pow y-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))) (pow a 2)))))) (pow a 2)) (/ (* (pow y-scale 2) (* (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))) (pow a 2)))))) (+ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6))))))))) (* a (pow x-scale 2))))))) (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 2) (* (sqrt 8) (- (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 2)))))) (pow a 2))))))) a))))))))))> |
#<alt (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))> |
#<alt (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))> |
#<alt (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))> |
#<alt (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))> |
#<alt (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))> |
#<alt (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))> |
#<alt (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))> |
#<alt (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))> |
#<alt (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/4 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))> |
#<alt (+ (* 1/4 (/ (* a (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))))))) (* (pow b 3) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/4 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))> |
#<alt (+ (* a (+ (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))))) (* (pow b 3) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* a (* x-scale (+ (* 1/8 (+ (* -1/2 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow b 3) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))))) (* 1/8 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))) (* b (sin (* 1/180 (* angle (PI)))))))))))) (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/4 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))> |
#<alt (+ (* a (+ (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))))) (* (pow b 3) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* a (+ (* 1/8 (* a (* x-scale (+ (* -1 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))))) (* (pow b 5) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (pow b 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))))))) (* x-scale (+ (* 1/8 (+ (* -1/2 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow b 3) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))))) (* 1/8 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))) (* b (sin (* 1/180 (* angle (PI))))))))))))) (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/4 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))> |
#<alt (* a (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))> |
#<alt (* a (+ (* 1/4 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))))) (* a (* x-scale (cos (* 1/180 (* angle (PI)))))))) (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))> |
#<alt (* a (+ (* 1/4 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))))) (* a (* x-scale (cos (* 1/180 (* angle (PI)))))))) (+ (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (/ (* x-scale (+ (* 1/8 (+ (* -1/2 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (* 1/8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (cos (* 1/180 (* angle (PI)))))))) (pow a 2)))))> |
#<alt (* a (+ (* 1/8 (/ (* x-scale (+ (* -1 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 b) (* 2 b))))))) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* 4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (+ (* -2 b) (* 2 b)))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))))) (pow a 3))) (+ (* 1/4 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))))) (* a (* x-scale (cos (* 1/180 (* angle (PI)))))))) (+ (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (/ (* x-scale (+ (* 1/8 (+ (* -1/2 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (* 1/8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (cos (* 1/180 (* angle (PI)))))))) (pow a 2))))))> |
#<alt (* -1 (* a (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))> |
#<alt (* -1 (* a (+ (* -1/4 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))))) (* a (* x-scale (cos (* 1/180 (* angle (PI)))))))) (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))))> |
#<alt (* -1 (* a (+ (* -1 (/ (+ (* -1 (/ (* x-scale (+ (* 1/8 (+ (* -1/2 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (* 1/8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (cos (* 1/180 (* angle (PI)))))))) a)) (* 1/4 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))) a)) (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))))> |
#<alt (* -1 (* a (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (/ (* x-scale (+ (* -1 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 b) (* 2 b))))))) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* 4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (+ (* -2 b) (* 2 b)))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))))) a)) (* x-scale (+ (* 1/8 (+ (* -1/2 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (* 1/8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (cos (* 1/180 (* angle (PI))))))))) a)) (* 1/4 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))) a)) (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))))> |
#<alt (* b (sqrt 2))> |
#<alt (+ (* 1/2 (/ (* (pow angle 2) (* (sqrt 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))))) b)) (* b (sqrt 2)))> |
#<alt (+ (* b (sqrt 2)) (* (pow angle 2) (+ (* 1/2 (/ (* (sqrt 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) b)) (* 1/2 (/ (* (pow angle 2) (* (sqrt 2) (- (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (* 1/4 (/ (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2) (pow b 2)))))) b)))))> |
#<alt (+ (* b (sqrt 2)) (* (pow angle 2) (+ (* 1/2 (/ (* (sqrt 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) b)) (* (pow angle 2) (+ (* 1/2 (/ (* (sqrt 2) (- (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (* 1/4 (/ (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2) (pow b 2))))) b)) (* 1/2 (/ (* (pow angle 2) (* (sqrt 2) (- (+ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6))))) (* 1/2 (/ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (- (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (* 1/4 (/ (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2) (pow b 2))))) (pow b 2)))))) b)))))))> |
#<alt (* (sqrt 2) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))> |
#<alt (* (sqrt 2) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))> |
#<alt (* (sqrt 2) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))> |
#<alt (* (sqrt 2) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))> |
#<alt (* (sqrt 2) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))> |
#<alt (* (sqrt 2) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))> |
#<alt (* (sqrt 2) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))> |
#<alt (* (sqrt 2) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))> |
#<alt (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))> |
#<alt (+ (* 1/2 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (sqrt 2))) (* a (sin (* 1/180 (* angle (PI))))))) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))> |
#<alt (+ (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))) (* (pow b 2) (+ (* -1/8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (sqrt 2))) (* (pow a 3) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* 1/2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (sqrt 2)) (* a (sin (* 1/180 (* angle (PI))))))))))> |
#<alt (+ (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))) (* (pow b 2) (+ (* 1/2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (sqrt 2)) (* a (sin (* 1/180 (* angle (PI))))))) (* (pow b 2) (+ (* -1/8 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (sqrt 2)) (* (pow a 3) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* 1/16 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 6) (sqrt 2))) (* (pow a 5) (pow (sin (* 1/180 (* angle (PI)))) 5)))))))))> |
#<alt (* b (* (cos (* 1/180 (* angle (PI)))) (sqrt 2)))> |
#<alt (* b (+ (* 1/2 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 2))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* (cos (* 1/180 (* angle (PI)))) (sqrt 2))))> |
#<alt (* b (+ (* -1/8 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 2))) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/2 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 2))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* (cos (* 1/180 (* angle (PI)))) (sqrt 2)))))> |
#<alt (* b (+ (* -1/8 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 2))) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/16 (/ (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (sqrt 2))) (* (pow b 6) (pow (cos (* 1/180 (* angle (PI)))) 5)))) (+ (* 1/2 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 2))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* (cos (* 1/180 (* angle (PI)))) (sqrt 2))))))> |
#<alt (* -1 (* b (* (cos (* 1/180 (* angle (PI)))) (sqrt 2))))> |
#<alt (* -1 (* b (+ (* 1/2 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 2))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* (cos (* 1/180 (* angle (PI)))) (sqrt 2)))))> |
#<alt (* -1 (* b (+ (* -1/8 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 2))) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/2 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 2))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* (cos (* 1/180 (* angle (PI)))) (sqrt 2))))))> |
#<alt (* -1 (* b (+ (* -1/8 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 2))) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/16 (/ (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (sqrt 2))) (* (pow b 6) (pow (cos (* 1/180 (* angle (PI)))) 5)))) (+ (* 1/2 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 2))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* (cos (* 1/180 (* angle (PI)))) (sqrt 2)))))))> |
#<alt (* b (* (cos (* 1/180 (* angle (PI)))) (sqrt 2)))> |
#<alt (+ (* 1/2 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 2))) (* b (cos (* 1/180 (* angle (PI))))))) (* b (* (cos (* 1/180 (* angle (PI)))) (sqrt 2))))> |
#<alt (+ (* b (* (cos (* 1/180 (* angle (PI)))) (sqrt 2))) (* (pow a 2) (+ (* -1/8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 2))) (* (pow b 3) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (* 1/2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 2)) (* b (cos (* 1/180 (* angle (PI))))))))))> |
#<alt (+ (* b (* (cos (* 1/180 (* angle (PI)))) (sqrt 2))) (* (pow a 2) (+ (* 1/2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 2)) (* b (cos (* 1/180 (* angle (PI))))))) (* (pow a 2) (+ (* -1/8 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 2)) (* (pow b 3) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (* 1/16 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (sqrt 2))) (* (pow b 5) (pow (cos (* 1/180 (* angle (PI)))) 5)))))))))> |
#<alt (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))> |
#<alt (* a (+ (* 1/2 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (sqrt 2))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))> |
#<alt (* a (+ (* -1/8 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (sqrt 2))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/2 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (sqrt 2))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))> |
#<alt (* a (+ (* -1/8 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (sqrt 2))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/16 (/ (* (pow b 6) (* (pow (cos (* 1/180 (* angle (PI)))) 6) (sqrt 2))) (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 5)))) (+ (* 1/2 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (sqrt 2))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))> |
#<alt (* -1 (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))> |
#<alt (* -1 (* a (+ (* 1/2 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (sqrt 2))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))> |
#<alt (* -1 (* a (+ (* -1/8 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (sqrt 2))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/2 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (sqrt 2))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))> |
#<alt (* -1 (* a (+ (* -1/8 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (sqrt 2))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/16 (/ (* (pow b 6) (* (pow (cos (* 1/180 (* angle (PI)))) 6) (sqrt 2))) (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 5)))) (+ (* 1/2 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (sqrt 2))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))> |
#<alt 1> |
#<alt (+ 1 (* -1/64800 (* (pow angle 2) (pow (PI) 2))))> |
#<alt (+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* 1/25194240000 (* (pow angle 2) (pow (PI) 4))))))> |
#<alt (+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/24488801280000000 (* (pow angle 2) (pow (PI) 6))) (* 1/25194240000 (pow (PI) 4)))))))> |
#<alt (cos (* 1/180 (* angle (PI))))> |
#<alt (cos (* 1/180 (* angle (PI))))> |
#<alt (cos (* 1/180 (* angle (PI))))> |
#<alt (cos (* 1/180 (* angle (PI))))> |
#<alt (cos (* 1/180 (* angle (PI))))> |
#<alt (cos (* 1/180 (* angle (PI))))> |
#<alt (cos (* 1/180 (* angle (PI))))> |
#<alt (cos (* 1/180 (* angle (PI))))> |
#<alt (* 1/180 (* angle (PI)))> |
#<alt (* angle (+ (* -1/34992000 (* (pow angle 2) (pow (PI) 3))) (* 1/180 (PI))))> |
#<alt (* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* 1/22674816000000 (* (pow angle 2) (pow (PI) 5)))))))> |
#<alt (* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* (pow angle 2) (+ (* -1/30855889612800000000 (* (pow angle 2) (pow (PI) 7))) (* 1/22674816000000 (pow (PI) 5))))))))> |
#<alt (sin (* 1/180 (* angle (PI))))> |
#<alt (sin (* 1/180 (* angle (PI))))> |
#<alt (sin (* 1/180 (* angle (PI))))> |
#<alt (sin (* 1/180 (* angle (PI))))> |
#<alt (sin (* 1/180 (* angle (PI))))> |
#<alt (sin (* 1/180 (* angle (PI))))> |
#<alt (sin (* 1/180 (* angle (PI))))> |
#<alt (sin (* 1/180 (* angle (PI))))> |
#<alt 1> |
#<alt (+ 1 (* -1/64800 (* (pow angle 2) (pow (PI) 2))))> |
#<alt (+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* 1/25194240000 (* (pow angle 2) (pow (PI) 4))))))> |
#<alt (+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/24488801280000000 (* (pow angle 2) (pow (PI) 6))) (* 1/25194240000 (pow (PI) 4)))))))> |
#<alt (cos (* 1/180 (* angle (PI))))> |
#<alt (cos (* 1/180 (* angle (PI))))> |
#<alt (cos (* 1/180 (* angle (PI))))> |
#<alt (cos (* 1/180 (* angle (PI))))> |
#<alt (cos (* 1/180 (* angle (PI))))> |
#<alt (cos (* 1/180 (* angle (PI))))> |
#<alt (cos (* 1/180 (* angle (PI))))> |
#<alt (cos (* 1/180 (* angle (PI))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))> |
#<alt (+ (* 1/16 (* (/ (* a (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))> |
#<alt (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))) (* a (+ (* 1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* 1/8 (* (* a (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (+ (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (sqrt (/ 1 (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))))> |
#<alt (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))) (* a (+ (* 1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* a (+ (* 1/8 (* (* a (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 (pow b 3)) (* 2 (pow b 3))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (* 1/4 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 (pow b 3)) (* 2 (pow b 3))) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (+ (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))) (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (+ (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))) (sqrt (/ 1 (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))))))> |
#<alt (* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))> |
#<alt (* a (+ (* 1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))) (* a (* x-scale y-scale))) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))))> |
#<alt (* a (+ (* 1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))) (* a (* x-scale y-scale))) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))))))) (pow a 2)) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))))> |
#<alt (* a (+ (* 1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))) (* a (* x-scale y-scale))) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 b) (* 2 b)) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (* 1/4 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 b) (* 2 b)) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))))))) (pow a 3)) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))))))) (pow a 2)) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))))))> |
#<alt (* -1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))> |
#<alt (* -1 (* a (+ (* -1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))) (* a (* x-scale y-scale))) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))))> |
#<alt (* -1 (* a (+ (* -1 (/ (+ (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))))))) a) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))) (* 1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))))) a)) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))))> |
#<alt (* -1 (* a (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 b) (* 2 b)) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (* 1/4 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 b) (* 2 b)) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))))))) a) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))) (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))))))) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) a)) (* 1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))))) a)) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))> |
#<alt (+ (* 1/16 (* (/ (* b (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))> |
#<alt (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* b (+ (* 1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* 1/8 (* (* b (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (+ (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (sqrt (/ 1 (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))))> |
#<alt (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* b (+ (* 1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* b (+ (* 1/8 (* (* b (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 (pow a 3)) (* 2 (pow a 3))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (* 1/4 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 (pow a 3)) (* 2 (pow a 3))) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (+ (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (+ (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (sqrt (/ 1 (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))))))> |
#<alt (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))> |
#<alt (* b (+ (* 1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))) (* b (* x-scale y-scale))) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))))> |
#<alt (* b (+ (* 1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))) (* b (* x-scale y-scale))) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))))))) (pow b 2)) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))))> |
#<alt (* b (+ (* 1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))) (* b (* x-scale y-scale))) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 a) (* 2 a)) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (* 1/4 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 a) (* 2 a)) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))))))) (pow b 3)) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))))))) (pow b 2)) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))))))> |
#<alt (* -1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))> |
#<alt (* -1 (* b (+ (* -1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))) (* b (* x-scale y-scale))) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))))> |
#<alt (* -1 (* b (+ (* -1 (/ (+ (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))))))) b) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (* 1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))))) b)) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))))> |
#<alt (* -1 (* b (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 a) (* 2 a)) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (* 1/4 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 a) (* 2 a)) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))))))) b) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))))))) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) b)) (* 1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))))) b)) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))))> |
#<alt (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))> |
#<alt (+ (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))> |
#<alt (+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))))> |
#<alt (+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))> |
#<alt (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))> |
#<alt (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))))> |
#<alt (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))) (pow x-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))))> |
#<alt (* -1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))> |
#<alt (* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))))> |
#<alt (* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))))> |
#<alt (* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))) (pow x-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))))))> |
#<alt (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))> |
#<alt (+ (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))> |
#<alt (+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))))> |
#<alt (+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))> |
#<alt (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))> |
#<alt (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))))> |
#<alt (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))) (pow y-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))))> |
#<alt (* -1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))> |
#<alt (* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))))> |
#<alt (* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))))> |
#<alt (* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))) (pow y-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))))))> |
#<alt (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))> |
#<alt (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))))))) (* b (sqrt 2)))) (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))))> |
#<alt (+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/2 (/ (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))))) (* b (sqrt 2)))))))> |
#<alt (+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))))) (* b (sqrt 2)))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow y-scale 2))) (+ (* -1/765275040000000 (/ (* (pow b 2) (pow (PI) 6)) (pow x-scale 2))) (+ (* 1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow x-scale 2))) (+ (* 1/765275040000000 (/ (* (pow b 2) (pow (PI) 6)) (pow y-scale 2))) (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))))) (+ (* 2 (* (- (+ (* -1/765275040000000 (/ (* (pow b 2) (pow (PI) 6)) (pow x-scale 2))) (* 1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow x-scale 2)))) (+ (* -1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow y-scale 2))) (* 1/765275040000000 (/ (* (pow b 2) (pow (PI) 6)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow (+ a b) 2) (* (+ (* 1/31886460000000 (pow (PI) 6)) (* 1/19131876000000 (pow (PI) 6))) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (* 1/2 (/ (* (pow x-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/2 (/ (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/2 (/ (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2)))))))) (* b (sqrt 2)))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))> |
#<alt 1> |
#<alt (+ 1 (* -1/16200 (* (pow angle 2) (pow (PI) 2))))> |
#<alt (+ 1 (* (pow angle 2) (+ (* -1/16200 (pow (PI) 2)) (* 1/1574640000 (* (pow angle 2) (pow (PI) 4))))))> |
#<alt (+ 1 (* (pow angle 2) (+ (* -1/16200 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/382637520000000 (* (pow angle 2) (pow (PI) 6))) (* 1/1574640000 (pow (PI) 4)))))))> |
#<alt (cos (* 1/90 (* angle (PI))))> |
#<alt (cos (* 1/90 (* angle (PI))))> |
#<alt (cos (* 1/90 (* angle (PI))))> |
#<alt (cos (* 1/90 (* angle (PI))))> |
#<alt (cos (* 1/90 (* angle (PI))))> |
#<alt (cos (* 1/90 (* angle (PI))))> |
#<alt (cos (* 1/90 (* angle (PI))))> |
#<alt (cos (* 1/90 (* angle (PI))))> |
#<alt (/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))> |
#<alt (/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))> |
#<alt (/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))> |
#<alt (/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))> |
#<alt (/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))> |
#<alt (/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))> |
#<alt (/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))> |
#<alt (/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))> |
#<alt (/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))> |
#<alt (/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))> |
#<alt (/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))> |
#<alt (/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))> |
#<alt (* 1/32400 (/ (* (pow a 2) (* (pow angle 2) (pow (PI) 2))) (pow x-scale 2)))> |
#<alt (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow a 2) (* (pow angle 2) (pow (PI) 4))) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))))> |
#<alt (* (pow angle 2) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/765275040000000 (/ (* (pow a 2) (* (pow angle 2) (pow (PI) 6))) (pow x-scale 2)))))))> |
#<alt (* (pow angle 2) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* (pow angle 2) (+ (* -1/347128758144000000000 (/ (* (pow a 2) (* (pow angle 2) (pow (PI) 8))) (pow x-scale 2))) (* 1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow x-scale 2)))))))))> |
#<alt (/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))> |
#<alt (/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))> |
#<alt (/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))> |
#<alt (/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))> |
#<alt (/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))> |
#<alt (/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))> |
#<alt (/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))> |
#<alt (/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))> |
#<alt (/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))> |
#<alt (/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))> |
#<alt (/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))> |
#<alt (/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))> |
#<alt (/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))> |
#<alt (/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))> |
#<alt (/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))> |
#<alt (/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))> |
#<alt (/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))> |
#<alt (/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))> |
#<alt (/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))> |
#<alt (/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))> |
#<alt (* 1/4 (* (* (sqrt 2) (sqrt 8)) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))> |
#<alt (+ (* 1/8 (* (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* 1/4 (* (* (sqrt 2) (sqrt 8)) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))> |
#<alt (+ (* 1/8 (* (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* 1/4 (* (* (sqrt 2) (sqrt 8)) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))> |
#<alt (+ (* 1/8 (* (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* 1/4 (* (* (sqrt 2) (sqrt 8)) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))> |
#<alt (* 1/8 (* (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))> |
#<alt (* (pow y-scale 2) (+ (* 1/8 (* (/ (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* 1/4 (* (/ (* (sqrt 2) (sqrt 8)) (pow y-scale 2)) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))> |
#<alt (* (pow y-scale 2) (+ (* 1/8 (* (/ (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* 1/4 (* (/ (* (sqrt 2) (sqrt 8)) (pow y-scale 2)) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))> |
#<alt (* (pow y-scale 2) (+ (* 1/8 (* (/ (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* 1/4 (* (/ (* (sqrt 2) (sqrt 8)) (pow y-scale 2)) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))> |
#<alt (* -1/8 (* (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))> |
#<alt (* (pow y-scale 2) (+ (* -1/4 (* (/ (* (sqrt 2) (sqrt 8)) (pow y-scale 2)) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* -1/8 (* (/ (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))> |
#<alt (* (pow y-scale 2) (+ (* -1/4 (* (/ (* (sqrt 2) (sqrt 8)) (pow y-scale 2)) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* -1/8 (* (/ (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))> |
#<alt (* (pow y-scale 2) (+ (* -1/4 (* (/ (* (sqrt 2) (sqrt 8)) (pow y-scale 2)) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* -1/8 (* (/ (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))> |
#<alt (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (* 1/4 (* a (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))> |
#<alt (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (+ (* 1/4 (* a (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* b (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))))))) (* (pow a 3) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))))))> |
#<alt (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (+ (* 1/4 (* a (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* b (+ (* 1/4 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))))) (* (pow a 3) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (* b (+ (* 1/8 (+ (* -1/2 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow a 3) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 3))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))))) (* 1/8 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))) (* a (cos (* 1/180 (* angle (PI)))))))))))))> |
#<alt (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (+ (* 1/4 (* a (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* b (+ (* 1/4 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))))) (* (pow a 3) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (* b (+ (* 1/8 (* b (+ (* -1 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))))) (* (pow a 5) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 3))))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (pow a 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))))))) (+ (* 1/8 (+ (* -1/2 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow a 3) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 3))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))))) (* 1/8 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))) (* a (cos (* 1/180 (* angle (PI))))))))))))))> |
#<alt (* b (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))> |
#<alt (* b (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))))))> |
#<alt (* b (+ (* 1/8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (* (pow b 2) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/8 (/ (+ (* -1/2 (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (pow b 2))) (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))))))))> |
#<alt (* b (+ (* 1/8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (* (pow b 2) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/8 (/ (+ (* -1 (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 a) (* 2 a))))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* 4 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (+ (* -2 a) (* 2 a)))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (pow b 3))) (+ (* 1/8 (/ (+ (* -1/2 (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (pow b 2))) (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))))))))))> |
#<alt (* -1 (* b (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))> |
#<alt (* -1 (* b (+ (* -1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))> |
#<alt (* -1 (* b (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/8 (+ (* -1/2 (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (sin (* 1/180 (* angle (PI))))))) b)) (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) b)) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))> |
#<alt (* -1 (* b (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (/ (+ (* -1 (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 a) (* 2 a))))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* 4 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (+ (* -2 a) (* 2 a)))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) b)) (+ (* 1/8 (+ (* -1/2 (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (sin (* 1/180 (* angle (PI)))))))) b)) (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) b)) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))> |
#<alt (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (pow b 2)) (pow b 2))))) (* a (pow x-scale 2)))) (* 1/4 (* a (* (sqrt 2) (sqrt 8)))))> |
#<alt (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (pow b 2)) (pow b 2))))) (* a (pow x-scale 2)))) (+ (* 1/4 (* a (* (sqrt 2) (sqrt 8)))) (* (pow angle 2) (+ (* 1/8 (+ (* -1/2 (/ (* (pow y-scale 4) (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1 (pow b 2)) (pow b 2)) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))))) (* (pow a 3) (pow x-scale 2)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))))))) (* a (pow x-scale 2))))) (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 2) (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))))) a))))))> |
#<alt (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (pow b 2)) (pow b 2))))) (* a (pow x-scale 2)))) (+ (* 1/4 (* a (* (sqrt 2) (sqrt 8)))) (* (pow angle 2) (+ (* 1/8 (+ (* -1/2 (/ (* (pow y-scale 4) (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1 (pow b 2)) (pow b 2)) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))))) (* (pow a 3) (pow x-scale 2)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))))))) (* a (pow x-scale 2))))) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 2) (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))))) a)) (* (pow angle 2) (+ (* 1/8 (+ (* -1/2 (/ (* a (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (+ (* 1/4 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (/ (* (pow y-scale 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (pow a 4)))) (+ (* -1 (pow b 2)) (pow b 2)))))) (pow x-scale 2))) (+ (* -1/2 (/ (* (pow y-scale 4) (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2))))))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))))) (* (pow a 3) (pow x-scale 2)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (+ (* (pow b 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 2))))) (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))))) (pow a 2)) (+ (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))) (pow a 2))) (/ (* (pow y-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))) (pow a 2))))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))) (* a (pow x-scale 2)))))) (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 2) (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 2))))))) a)))))))))> |
#<alt (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (pow b 2)) (pow b 2))))) (* a (pow x-scale 2)))) (+ (* 1/4 (* a (* (sqrt 2) (sqrt 8)))) (* (pow angle 2) (+ (* 1/8 (+ (* -1/2 (/ (* (pow y-scale 4) (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1 (pow b 2)) (pow b 2)) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))))) (* (pow a 3) (pow x-scale 2)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))))))) (* a (pow x-scale 2))))) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 2) (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))))) a)) (* (pow angle 2) (+ (* 1/8 (+ (* -1/2 (/ (* a (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (+ (* 1/4 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (/ (* (pow y-scale 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (pow a 4)))) (+ (* -1 (pow b 2)) (pow b 2)))))) (pow x-scale 2))) (+ (* -1/2 (/ (* (pow y-scale 4) (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2))))))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))))) (* (pow a 3) (pow x-scale 2)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (+ (* (pow b 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 2))))) (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))))) (pow a 2)) (+ (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))) (pow a 2))) (/ (* (pow y-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))) (pow a 2))))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))) (* a (pow x-scale 2)))))) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 2) (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 2))))))) a)) (* (pow angle 2) (+ (* 1/8 (+ (* -1/2 (/ (* a (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1 (/ (* (pow y-scale 2) (* (+ (* -1 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (/ (* (pow y-scale 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (pow a 4))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2))) (+ (* -1 (/ (* (pow y-scale 6) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))) (pow a 6))) (+ (* 1/2 (/ (* (pow y-scale 2) (* (+ (* -1 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (+ (* 1/4 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (/ (* (pow y-scale 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (pow a 4)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2))) (/ (* (pow y-scale 4) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (pow a 4))))) (+ (* -1 (pow b 2)) (pow b 2)))))) (pow x-scale 2))) (+ (* -1/2 (/ (* a (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (+ (* 1/4 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (/ (* (pow y-scale 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (pow a 4)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2))))))))))) (pow x-scale 2))) (+ (* -1/2 (/ (* (pow y-scale 4) (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (+ (* (pow b 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 2))))) (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))))) (pow a 2)) (+ (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))) (pow a 2))) (/ (* (pow y-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))) (pow a 2))))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))))))) (* (pow a 3) (pow x-scale 2)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (+ (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (+ (* (pow b 2) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))))) (pow y-scale 2)))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- b a) 2)))) (pow y-scale 2))) (/ (* (pow (+ a b) 2) (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- b a) 2))) (pow y-scale 2))))))) (pow a 2)) (+ (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))))) (pow a 2))) (+ (/ (* (pow y-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (+ (* (pow b 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 2))))) (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))))) (pow a 2)) (+ (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))) (pow a 2))) (/ (* (pow y-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))) (pow a 2)))))) (pow a 2)) (/ (* (pow y-scale 2) (* (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))) (pow a 2)))))) (+ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6))))))))) (* a (pow x-scale 2))))))) (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 2) (* (sqrt 8) (- (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 2)))))) (pow a 2))))))) a))))))))))))> |
#<alt (+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))> |
#<alt (+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))> |
#<alt (+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))> |
#<alt (+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))> |
#<alt (+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))> |
#<alt (+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))> |
#<alt (+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))> |
#<alt (+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))> |
#<alt (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/4 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))> |
#<alt (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (+ (* 1/4 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* a (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))))))) (* (pow b 3) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))))))> |
#<alt (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (+ (* 1/4 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* a (+ (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))))) (* (pow b 3) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* a (+ (* 1/8 (+ (* -1/2 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow b 3) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))))) (* 1/8 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))) (* b (sin (* 1/180 (* angle (PI)))))))))))))> |
#<alt (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (+ (* 1/4 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* a (+ (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))))) (* (pow b 3) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* a (+ (* 1/8 (* a (+ (* -1 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))))) (* (pow b 5) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (pow b 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))))))) (+ (* 1/8 (+ (* -1/2 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow b 3) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))))) (* 1/8 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))) (* b (sin (* 1/180 (* angle (PI))))))))))))))> |
#<alt (* a (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))> |
#<alt (* a (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (+ (* 1/4 (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))))))> |
#<alt (* a (+ (* 1/8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (* (pow a 2) (cos (* 1/180 (* angle (PI))))))) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (+ (* 1/8 (/ (+ (* -1/2 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/4 (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))))))))> |
#<alt (* a (+ (* 1/8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (* (pow a 2) (cos (* 1/180 (* angle (PI))))))) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (+ (* 1/8 (/ (+ (* -1 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 b) (* 2 b))))))) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* 4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (+ (* -2 b) (* 2 b)))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (pow a 3))) (+ (* 1/8 (/ (+ (* -1/2 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/4 (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))))))))))> |
#<alt (* -1 (* a (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))> |
#<alt (* -1 (* a (+ (* -1/4 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))> |
#<alt (* -1 (* a (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/8 (+ (* -1/2 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (* 1/8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (cos (* 1/180 (* angle (PI))))))) a)) (* 1/4 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) a)) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))> |
#<alt (* -1 (* a (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (/ (+ (* -1 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 b) (* 2 b))))))) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* 4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (+ (* -2 b) (* 2 b)))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) a)) (+ (* 1/8 (+ (* -1/2 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (* 1/8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (cos (* 1/180 (* angle (PI)))))))) a)) (* 1/4 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) a)) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))> |
#<alt (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))> |
#<alt (/ (+ (* 1/8 (* (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* (pow x-scale 2) (* y-scale (* (sqrt 2) (sqrt 8)))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow x-scale 2))> |
#<alt (/ (+ (* 1/8 (* (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* (pow x-scale 2) (* y-scale (* (sqrt 2) (sqrt 8)))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow x-scale 2))> |
#<alt (/ (+ (* 1/8 (* (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* (pow x-scale 2) (* y-scale (* (sqrt 2) (sqrt 8)))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow x-scale 2))> |
#<alt (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))> |
#<alt (+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))> |
#<alt (+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))> |
#<alt (+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))> |
#<alt (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))> |
#<alt (+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))> |
#<alt (+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))> |
#<alt (+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))> |
#<alt (* 2 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))> |
#<alt (* 2 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))> |
#<alt (* 2 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))> |
#<alt (* 2 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))> |
#<alt (* 2 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))> |
#<alt (* 2 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))> |
#<alt (* 2 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))> |
#<alt (* 2 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))> |
#<alt (* 2 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))> |
#<alt (* 2 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))> |
#<alt (* 2 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))> |
#<alt (* 2 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))> |
#<alt (* 1/16200 (* (pow angle 2) (pow (PI) 2)))> |
#<alt (* (pow angle 2) (+ (* 1/16200 (pow (PI) 2)) (* 2 (* (pow angle 2) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))))))> |
#<alt (* (pow angle 2) (+ (* 1/16200 (pow (PI) 2)) (* (pow angle 2) (+ (* 2 (* (pow angle 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (+ (* 1/1224440064000000 (pow (PI) 6)) (+ (* 1/102036672000000 (pow (PI) 6)) (* 1/32400 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))))))) (* 2 (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4))))))))> |
#<alt (* (pow angle 2) (+ (* 1/16200 (pow (PI) 2)) (* (pow angle 2) (+ (* 2 (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow angle 2) (+ (* 2 (* (pow angle 2) (+ (* -1/32400 (* (pow (PI) 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))) (+ (* -1/3149280000 (* (pow (PI) 4) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (+ (* -1/396718580736000000000 (pow (PI) 8)) (+ (* -1/2777030065152000000000 (pow (PI) 8)) (* 1/32400 (* (pow (PI) 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6))))))))))) (* 2 (+ (* 1/2040733440000000 (pow (PI) 6)) (+ (* 1/1224440064000000 (pow (PI) 6)) (+ (* 1/102036672000000 (pow (PI) 6)) (* 1/32400 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))))))))))))> |
#<alt (* 2 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))> |
#<alt (* 2 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))> |
#<alt (* 2 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))> |
#<alt (* 2 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))> |
#<alt (* 2 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))> |
#<alt (* 2 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))> |
#<alt (* 2 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))> |
#<alt (* 2 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))> |
246 calls:
| Time | Variable | Point | Expression | |
|---|---|---|---|---|
| 17.0ms | x-scale | @ | 0 | (neg (* b (+ (* 1/8 (/ (* (* y-scale y-scale) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (* y-scale y-scale) (* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* y-scale y-scale)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (* x-scale x-scale) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))) |
| 14.0ms | angle | @ | inf | (+ (/ (* (* a a) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale x-scale)) (/ (* (* b b) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale x-scale))) |
| 4.0ms | b | @ | 0 | (neg (* b (+ (* 1/8 (/ (* (* y-scale y-scale) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (* y-scale y-scale) (* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* y-scale y-scale)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (* x-scale x-scale) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))) |
| 4.0ms | y-scale | @ | inf | (* (/ -1 (* (neg (* a b)) (* 4 (* a b)))) (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale)))))) |
| 3.0ms | angle | @ | 0 | (neg (* b (+ (* 1/8 (/ (* (* y-scale y-scale) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (* y-scale y-scale) (* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* y-scale y-scale)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (* x-scale x-scale) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))) |
| 1× | egg-herbie |
| 9 544× | lower-*.f64 |
| 9 544× | lower-*.f32 |
| 3 686× | lower-+.f64 |
| 3 686× | lower-+.f32 |
| 3 670× | lower-fma.f64 |
Useful iterations: 0 (0.0ms)
| Iter | Nodes | Cost |
|---|---|---|
| 0 | 3170 | 271039 |
| 0 | 8271 | 265694 |
| 1× | iter limit |
| 1× | node limit |
| Inputs |
|---|
1 |
(+ 1 (* -1/32400 (* (pow angle 2) (pow (PI) 2)))) |
(+ 1 (* (pow angle 2) (+ (* -1/32400 (pow (PI) 2)) (* (pow angle 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) |
(+ 1 (* (pow angle 2) (+ (* -1/32400 (pow (PI) 2)) (* (pow angle 2) (+ (* 1/12597120000 (pow (PI) 4)) (+ (* 1/4199040000 (pow (PI) 4)) (* (pow angle 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))))))))) |
(pow (cos (* 1/180 (* angle (PI)))) 2) |
(pow (cos (* 1/180 (* angle (PI)))) 2) |
(pow (cos (* 1/180 (* angle (PI)))) 2) |
(pow (cos (* 1/180 (* angle (PI)))) 2) |
(pow (cos (* 1/180 (* angle (PI)))) 2) |
(pow (cos (* 1/180 (* angle (PI)))) 2) |
(pow (cos (* 1/180 (* angle (PI)))) 2) |
(pow (cos (* 1/180 (* angle (PI)))) 2) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(+ (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))))) |
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) |
(* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))) |
(* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) |
(* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))))) |
(* -1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) |
(* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) |
(* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))))) |
(* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(+ (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))))) |
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) |
(* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) |
(* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) |
(* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))) |
(* -1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) |
(* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) |
(* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))) |
(* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))))) |
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) |
(+ (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) |
(+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))) |
(+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) |
(* -1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) |
(* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) |
(* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))))) |
(* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) |
(+ (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) |
(+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))) |
(+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) |
(* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) |
(* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) |
(* -1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) |
(* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) |
(* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))))) |
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) |
(+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))))))) (* b (sqrt 2)))) (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))) |
(+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))))) (* b (sqrt 2))))))) |
(+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))))) (* b (sqrt 2)))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))))) (* 1/2 (/ (* (pow x-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2)))))))) (* b (sqrt 2))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) |
(+ (* 1/8 (/ (* (pow angle 2) (* y-scale (* (sqrt 2) (* (sqrt 8) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))))))) b)) (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))) |
(+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* y-scale (* (sqrt 2) (* (sqrt 8) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))))) b)) (* 1/8 (/ (* (pow angle 2) (* y-scale (* (sqrt 2) (* (sqrt 8) (- (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (* 1/4 (/ (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2) (pow b 2)))))))) b))))) |
(+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* y-scale (* (sqrt 2) (* (sqrt 8) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))))) b)) (* (pow angle 2) (+ (* 1/8 (/ (* y-scale (* (sqrt 2) (* (sqrt 8) (- (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (* 1/4 (/ (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2) (pow b 2))))))) b)) (* 1/8 (/ (* (pow angle 2) (* y-scale (* (sqrt 2) (* (sqrt 8) (- (+ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6))))) (* 1/2 (/ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (- (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (* 1/4 (/ (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2) (pow b 2))))) (pow b 2)))))))) b))))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(+ (* 1/8 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* a (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))) |
(+ (* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (* (pow b 2) (+ (* -1/32 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow a 3) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* 1/8 (/ (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (* a (sin (* 1/180 (* angle (PI)))))))))) |
(+ (* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (* (pow b 2) (+ (* 1/8 (/ (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (* a (sin (* 1/180 (* angle (PI))))))) (* (pow b 2) (+ (* -1/32 (/ (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8)))) (* (pow a 3) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* 1/64 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 6) (* (sqrt 2) (sqrt 8))))) (* (pow a 5) (pow (sin (* 1/180 (* angle (PI)))) 5))))))))) |
(* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(* b (+ (* 1/8 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))) |
(* b (+ (* -1/32 (/ (* (pow a 4) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/8 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))) |
(* b (+ (* -1/32 (/ (* (pow a 4) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/64 (/ (* (pow a 6) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 6) (* (sqrt 2) (sqrt 8))))) (* (pow b 6) (pow (cos (* 1/180 (* angle (PI)))) 5)))) (+ (* 1/8 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))) |
(* -1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(* -1 (* b (+ (* 1/8 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))) |
(* -1 (* b (+ (* -1/32 (/ (* (pow a 4) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/8 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))) |
(* -1 (* b (+ (* -1/32 (/ (* (pow a 4) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/64 (/ (* (pow a 6) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 6) (* (sqrt 2) (sqrt 8))))) (* (pow b 6) (pow (cos (* 1/180 (* angle (PI)))) 5)))) (+ (* 1/8 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))))) |
(* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(+ (* 1/8 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* b (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))) |
(+ (* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (* (pow a 2) (+ (* -1/32 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow b 3) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (* 1/8 (/ (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (* b (cos (* 1/180 (* angle (PI)))))))))) |
(+ (* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (* (pow a 2) (+ (* 1/8 (/ (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (* b (cos (* 1/180 (* angle (PI))))))) (* (pow a 2) (+ (* -1/32 (/ (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8)))) (* (pow b 3) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (* 1/64 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 6) (* (sqrt 2) (sqrt 8))))) (* (pow b 5) (pow (cos (* 1/180 (* angle (PI)))) 5))))))))) |
(* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(* a (+ (* 1/8 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))) |
(* a (+ (* -1/32 (/ (* (pow b 4) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/8 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))) |
(* a (+ (* -1/32 (/ (* (pow b 4) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/64 (/ (* (pow b 6) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 6) (* (sqrt 2) (sqrt 8))))) (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 5)))) (+ (* 1/8 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))) |
(* -1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(* -1 (* a (+ (* 1/8 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))) |
(* -1 (* a (+ (* -1/32 (/ (* (pow b 4) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/8 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))) |
(* -1 (* a (+ (* -1/32 (/ (* (pow b 4) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/64 (/ (* (pow b 6) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 6) (* (sqrt 2) (sqrt 8))))) (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 5)))) (+ (* 1/8 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))))) |
(* 1/4 (* y-scale (sqrt 8))) |
(* 1/4 (* y-scale (sqrt 8))) |
(* 1/4 (* y-scale (sqrt 8))) |
(* 1/4 (* y-scale (sqrt 8))) |
(* 1/4 (* y-scale (sqrt 8))) |
(* 1/4 (* y-scale (sqrt 8))) |
(* 1/4 (* y-scale (sqrt 8))) |
(* 1/4 (* y-scale (sqrt 8))) |
(* 1/4 (* y-scale (sqrt 8))) |
(* 1/4 (* y-scale (sqrt 8))) |
(* 1/4 (* y-scale (sqrt 8))) |
(* 1/4 (* y-scale (sqrt 8))) |
(* b y-scale) |
(* b y-scale) |
(* b y-scale) |
(* b y-scale) |
(* b y-scale) |
(* b y-scale) |
(* b y-scale) |
(* b y-scale) |
(* b y-scale) |
(* b y-scale) |
(* b y-scale) |
(* b y-scale) |
(* b y-scale) |
(* b y-scale) |
(* b y-scale) |
(* b y-scale) |
(* b y-scale) |
(* b y-scale) |
(* b y-scale) |
(* b y-scale) |
(* b y-scale) |
(* b y-scale) |
(* b y-scale) |
(* b y-scale) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(+ (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))))) |
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) |
(* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))) |
(* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) |
(* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))))) |
(* -1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) |
(* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) |
(* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))))) |
(* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(+ (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))))) |
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) |
(* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) |
(* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) |
(* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))) |
(* -1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) |
(* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) |
(* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))) |
(* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))))) |
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) |
(+ (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) |
(+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))) |
(+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) |
(* -1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) |
(* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) |
(* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))))) |
(* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) |
(+ (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) |
(+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))) |
(+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) |
(* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) |
(* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) |
(* -1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) |
(* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) |
(* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))))) |
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) |
(+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))))))) (* b (sqrt 2)))) (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))) |
(+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))))) (* b (sqrt 2))))))) |
(+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))))) (* b (sqrt 2)))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))))) (* 1/2 (/ (* (pow x-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2)))))))) (* b (sqrt 2))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(* 4 y-scale) |
(* 4 y-scale) |
(* 4 y-scale) |
(* 4 y-scale) |
(* 4 y-scale) |
(* 4 y-scale) |
(* 4 y-scale) |
(* 4 y-scale) |
(* 4 y-scale) |
(* 4 y-scale) |
(* 4 y-scale) |
(* 4 y-scale) |
(* 1/4 b) |
(* 1/4 b) |
(* 1/4 b) |
(* 1/4 b) |
(* 1/4 b) |
(* 1/4 b) |
(* 1/4 b) |
(* 1/4 b) |
(* 1/4 b) |
(* 1/4 b) |
(* 1/4 b) |
(* 1/4 b) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(+ (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))))) |
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) |
(* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))) |
(* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) |
(* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))))) |
(* -1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) |
(* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) |
(* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))))) |
(* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(+ (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))))) |
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) |
(* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) |
(* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) |
(* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))) |
(* -1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) |
(* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) |
(* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))) |
(* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))))) |
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) |
(+ (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) |
(+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))) |
(+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) |
(* -1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) |
(* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) |
(* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))))) |
(* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) |
(+ (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) |
(+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))) |
(+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) |
(* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) |
(* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) |
(* -1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) |
(* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) |
(* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))))) |
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) |
(+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))))))) (* b (sqrt 2)))) (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))) |
(+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))))) (* b (sqrt 2))))))) |
(+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))))) (* b (sqrt 2)))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))))) (* 1/2 (/ (* (pow x-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2)))))))) (* b (sqrt 2))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) |
(+ (* 1/8 (/ (* (pow angle 2) (* y-scale (* (sqrt 2) (* (sqrt 8) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))))))) b)) (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))) |
(+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* y-scale (* (sqrt 2) (* (sqrt 8) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))))) b)) (* 1/8 (/ (* (pow angle 2) (* y-scale (* (sqrt 2) (* (sqrt 8) (- (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (* 1/4 (/ (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2) (pow b 2)))))))) b))))) |
(+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* y-scale (* (sqrt 2) (* (sqrt 8) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))))) b)) (* (pow angle 2) (+ (* 1/8 (/ (* y-scale (* (sqrt 2) (* (sqrt 8) (- (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (* 1/4 (/ (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2) (pow b 2))))))) b)) (* 1/8 (/ (* (pow angle 2) (* y-scale (* (sqrt 2) (* (sqrt 8) (- (+ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6))))) (* 1/2 (/ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (- (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (* 1/4 (/ (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2) (pow b 2))))) (pow b 2)))))))) b))))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(+ (* 1/8 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* a (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))) |
(+ (* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (* (pow b 2) (+ (* -1/32 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow a 3) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* 1/8 (/ (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (* a (sin (* 1/180 (* angle (PI)))))))))) |
(+ (* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (* (pow b 2) (+ (* 1/8 (/ (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (* a (sin (* 1/180 (* angle (PI))))))) (* (pow b 2) (+ (* -1/32 (/ (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8)))) (* (pow a 3) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* 1/64 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 6) (* (sqrt 2) (sqrt 8))))) (* (pow a 5) (pow (sin (* 1/180 (* angle (PI)))) 5))))))))) |
(* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(* b (+ (* 1/8 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))) |
(* b (+ (* -1/32 (/ (* (pow a 4) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/8 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))) |
(* b (+ (* -1/32 (/ (* (pow a 4) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/64 (/ (* (pow a 6) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 6) (* (sqrt 2) (sqrt 8))))) (* (pow b 6) (pow (cos (* 1/180 (* angle (PI)))) 5)))) (+ (* 1/8 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))) |
(* -1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(* -1 (* b (+ (* 1/8 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))) |
(* -1 (* b (+ (* -1/32 (/ (* (pow a 4) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/8 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))) |
(* -1 (* b (+ (* -1/32 (/ (* (pow a 4) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/64 (/ (* (pow a 6) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 6) (* (sqrt 2) (sqrt 8))))) (* (pow b 6) (pow (cos (* 1/180 (* angle (PI)))) 5)))) (+ (* 1/8 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))))) |
(* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(+ (* 1/8 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* b (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))) |
(+ (* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (* (pow a 2) (+ (* -1/32 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow b 3) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (* 1/8 (/ (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (* b (cos (* 1/180 (* angle (PI)))))))))) |
(+ (* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (* (pow a 2) (+ (* 1/8 (/ (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (* b (cos (* 1/180 (* angle (PI))))))) (* (pow a 2) (+ (* -1/32 (/ (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8)))) (* (pow b 3) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (* 1/64 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 6) (* (sqrt 2) (sqrt 8))))) (* (pow b 5) (pow (cos (* 1/180 (* angle (PI)))) 5))))))))) |
(* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(* a (+ (* 1/8 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))) |
(* a (+ (* -1/32 (/ (* (pow b 4) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/8 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))) |
(* a (+ (* -1/32 (/ (* (pow b 4) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/64 (/ (* (pow b 6) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 6) (* (sqrt 2) (sqrt 8))))) (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 5)))) (+ (* 1/8 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))) |
(* -1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(* -1 (* a (+ (* 1/8 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))) |
(* -1 (* a (+ (* -1/32 (/ (* (pow b 4) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/8 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))) |
(* -1 (* a (+ (* -1/32 (/ (* (pow b 4) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/64 (/ (* (pow b 6) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 6) (* (sqrt 2) (sqrt 8))))) (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 5)))) (+ (* 1/8 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))))) |
(* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) |
(+ (* -1/259200 (* (pow angle 2) (* b (* y-scale (* (pow (PI) 2) (* (sqrt 2) (sqrt 8))))))) (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))) |
(+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* -1/259200 (* b (* y-scale (* (pow (PI) 2) (* (sqrt 2) (sqrt 8)))))) (* 1/100776960000 (* (pow angle 2) (* b (* y-scale (* (pow (PI) 4) (* (sqrt 2) (sqrt 8)))))))))) |
(+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* -1/259200 (* b (* y-scale (* (pow (PI) 2) (* (sqrt 2) (sqrt 8)))))) (* (pow angle 2) (+ (* -1/97955205120000000 (* (pow angle 2) (* b (* y-scale (* (pow (PI) 6) (* (sqrt 2) (sqrt 8))))))) (* 1/100776960000 (* b (* y-scale (* (pow (PI) 4) (* (sqrt 2) (sqrt 8))))))))))) |
(* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) |
(* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) |
(* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) |
(* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) |
(* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) |
(* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) |
(* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) |
(* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) |
(* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) |
(* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) |
(* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) |
(* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) |
(* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) |
(* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) |
(* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) |
(* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) |
(* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) |
(* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) |
(* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) |
(* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) |
(* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) |
(* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) |
(* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) |
(* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) |
(* b (* y-scale (* (sqrt 2) (sqrt 8)))) |
(+ (* -1/64800 (* (pow angle 2) (* b (* y-scale (* (pow (PI) 2) (* (sqrt 2) (sqrt 8))))))) (* b (* y-scale (* (sqrt 2) (sqrt 8))))) |
(+ (* b (* y-scale (* (sqrt 2) (sqrt 8)))) (* (pow angle 2) (+ (* -1/64800 (* b (* y-scale (* (pow (PI) 2) (* (sqrt 2) (sqrt 8)))))) (* 1/25194240000 (* (pow angle 2) (* b (* y-scale (* (pow (PI) 4) (* (sqrt 2) (sqrt 8)))))))))) |
(+ (* b (* y-scale (* (sqrt 2) (sqrt 8)))) (* (pow angle 2) (+ (* -1/64800 (* b (* y-scale (* (pow (PI) 2) (* (sqrt 2) (sqrt 8)))))) (* (pow angle 2) (+ (* -1/24488801280000000 (* (pow angle 2) (* b (* y-scale (* (pow (PI) 6) (* (sqrt 2) (sqrt 8))))))) (* 1/25194240000 (* b (* y-scale (* (pow (PI) 4) (* (sqrt 2) (sqrt 8))))))))))) |
(* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) |
(* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) |
(* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) |
(* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) |
(* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) |
(* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) |
(* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) |
(* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) |
(/ 1/4 (* (pow a 2) (pow b 2))) |
(/ 1/4 (* (pow a 2) (pow b 2))) |
(/ 1/4 (* (pow a 2) (pow b 2))) |
(/ 1/4 (* (pow a 2) (pow b 2))) |
(/ 1/4 (* (pow a 2) (pow b 2))) |
(/ 1/4 (* (pow a 2) (pow b 2))) |
(/ 1/4 (* (pow a 2) (pow b 2))) |
(/ 1/4 (* (pow a 2) (pow b 2))) |
(/ 1/4 (* (pow a 2) (pow b 2))) |
(/ 1/4 (* (pow a 2) (pow b 2))) |
(/ 1/4 (* (pow a 2) (pow b 2))) |
(/ 1/4 (* (pow a 2) (pow b 2))) |
(/ 1/4 (* (pow a 2) (pow b 2))) |
(/ 1/4 (* (pow a 2) (pow b 2))) |
(/ 1/4 (* (pow a 2) (pow b 2))) |
(/ 1/4 (* (pow a 2) (pow b 2))) |
(/ 1/4 (* (pow a 2) (pow b 2))) |
(/ 1/4 (* (pow a 2) (pow b 2))) |
(/ 1/4 (* (pow a 2) (pow b 2))) |
(/ 1/4 (* (pow a 2) (pow b 2))) |
(/ 1/4 (* (pow a 2) (pow b 2))) |
(/ 1/4 (* (pow a 2) (pow b 2))) |
(/ 1/4 (* (pow a 2) (pow b 2))) |
(/ 1/4 (* (pow a 2) (pow b 2))) |
(* -4 (* (pow a 2) (pow b 2))) |
(* -4 (* (pow a 2) (pow b 2))) |
(* -4 (* (pow a 2) (pow b 2))) |
(* -4 (* (pow a 2) (pow b 2))) |
(* -4 (* (pow a 2) (pow b 2))) |
(* -4 (* (pow a 2) (pow b 2))) |
(* -4 (* (pow a 2) (pow b 2))) |
(* -4 (* (pow a 2) (pow b 2))) |
(* -4 (* (pow a 2) (pow b 2))) |
(* -4 (* (pow a 2) (pow b 2))) |
(* -4 (* (pow a 2) (pow b 2))) |
(* -4 (* (pow a 2) (pow b 2))) |
(* -4 (* (pow a 2) (pow b 2))) |
(* -4 (* (pow a 2) (pow b 2))) |
(* -4 (* (pow a 2) (pow b 2))) |
(* -4 (* (pow a 2) (pow b 2))) |
(* -4 (* (pow a 2) (pow b 2))) |
(* -4 (* (pow a 2) (pow b 2))) |
(* -4 (* (pow a 2) (pow b 2))) |
(* -4 (* (pow a 2) (pow b 2))) |
(* -4 (* (pow a 2) (pow b 2))) |
(* -4 (* (pow a 2) (pow b 2))) |
(* -4 (* (pow a 2) (pow b 2))) |
(* -4 (* (pow a 2) (pow b 2))) |
(/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) |
(+ (* (pow a 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) |
(+ (* (pow a 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) |
(+ (* (pow a 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) |
(* (pow a 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2))))) |
(* (pow a 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) (pow x-scale 2)))))) |
(* (pow a 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) (pow x-scale 2)))))) |
(* (pow a 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) (pow x-scale 2)))))) |
(* (pow a 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2))))) |
(* (pow a 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) (pow x-scale 2)))))) |
(* (pow a 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) (pow x-scale 2)))))) |
(* (pow a 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) (pow x-scale 2)))))) |
(/ (pow b 2) (pow x-scale 2)) |
(+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))))) (/ (pow b 2) (pow x-scale 2))) |
(+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))))))) (/ (pow b 2) (pow x-scale 2))) |
(+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2))) (* (pow angle 2) (+ (* -1/765275040000000 (/ (* (pow b 2) (pow (PI) 6)) (pow x-scale 2))) (* 1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow x-scale 2))))))))))) (/ (pow b 2) (pow x-scale 2))) |
(+ (/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) |
(+ (/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) |
(+ (/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) |
(+ (/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) |
(+ (/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) |
(+ (/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) |
(+ (/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) |
(+ (/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) |
(/ (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow x-scale 2)) |
(/ (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow x-scale 2)) |
(/ (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow x-scale 2)) |
(/ (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow x-scale 2)) |
(/ (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow x-scale 2)) |
(/ (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow x-scale 2)) |
(/ (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow x-scale 2)) |
(/ (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow x-scale 2)) |
(/ (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow x-scale 2)) |
(/ (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow x-scale 2)) |
(/ (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow x-scale 2)) |
(/ (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow x-scale 2)) |
(/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) |
(+ (* (pow b 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) |
(+ (* (pow b 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) |
(+ (* (pow b 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) |
(* (pow b 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2))))) |
(* (pow b 2) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (pow x-scale 2)))))) |
(* (pow b 2) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (pow x-scale 2)))))) |
(* (pow b 2) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (pow x-scale 2)))))) |
(* (pow b 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2))))) |
(* (pow b 2) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (pow x-scale 2)))))) |
(* (pow b 2) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (pow x-scale 2)))))) |
(* (pow b 2) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (pow x-scale 2)))))) |
(* 1/32400 (* (pow angle 2) (pow (PI) 2))) |
(* (pow angle 2) (+ (* -1/3149280000 (* (pow angle 2) (pow (PI) 4))) (* 1/32400 (pow (PI) 2)))) |
(* (pow angle 2) (+ (* 1/32400 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/3149280000 (pow (PI) 4)) (* 1/765275040000000 (* (pow angle 2) (pow (PI) 6))))))) |
(* (pow angle 2) (+ (* 1/32400 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/3149280000 (pow (PI) 4)) (* (pow angle 2) (+ (* -1/347128758144000000000 (* (pow angle 2) (pow (PI) 8))) (* 1/765275040000000 (pow (PI) 6)))))))) |
(+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) |
(+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) |
(+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) |
(+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) |
(+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) |
(+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) |
(+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) |
(+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) |
(* 2 (pow (cos (* 1/180 (* angle (PI)))) 2)) |
(* 2 (pow (cos (* 1/180 (* angle (PI)))) 2)) |
(* 2 (pow (cos (* 1/180 (* angle (PI)))) 2)) |
(* 2 (pow (cos (* 1/180 (* angle (PI)))) 2)) |
(* 2 (pow (cos (* 1/180 (* angle (PI)))) 2)) |
(* 2 (pow (cos (* 1/180 (* angle (PI)))) 2)) |
(* 2 (pow (cos (* 1/180 (* angle (PI)))) 2)) |
(* 2 (pow (cos (* 1/180 (* angle (PI)))) 2)) |
(* 2 (pow (cos (* 1/180 (* angle (PI)))) 2)) |
(* 2 (pow (cos (* 1/180 (* angle (PI)))) 2)) |
(* 2 (pow (cos (* 1/180 (* angle (PI)))) 2)) |
(* 2 (pow (cos (* 1/180 (* angle (PI)))) 2)) |
2 |
(+ 2 (* -1/16200 (* (pow angle 2) (pow (PI) 2)))) |
(+ 2 (* (pow angle 2) (+ (* -1/16200 (pow (PI) 2)) (* 2 (* (pow angle 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))))) |
(+ 2 (* (pow angle 2) (+ (* -1/16200 (pow (PI) 2)) (* (pow angle 2) (+ (* 2 (* (pow angle 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6))))) (* 2 (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))) |
(* 2 (pow (cos (* 1/180 (* angle (PI)))) 2)) |
(* 2 (pow (cos (* 1/180 (* angle (PI)))) 2)) |
(* 2 (pow (cos (* 1/180 (* angle (PI)))) 2)) |
(* 2 (pow (cos (* 1/180 (* angle (PI)))) 2)) |
(* 2 (pow (cos (* 1/180 (* angle (PI)))) 2)) |
(* 2 (pow (cos (* 1/180 (* angle (PI)))) 2)) |
(* 2 (pow (cos (* 1/180 (* angle (PI)))) 2)) |
(* 2 (pow (cos (* 1/180 (* angle (PI)))) 2)) |
(* -1 (* b (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))))) |
(* -1 (* b (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))))) |
(* -1 (* b (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))))) |
(* -1 (* b (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))))) |
(* -1 (* b (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))))) |
(* -1 (* b (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))))) |
(* -1 (* b (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))))) |
(* -1 (* b (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))))) |
(* -1 (* b (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))))) |
(* -1 (* b (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))))) |
(* -1 (* b (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))))) |
(* -1 (* b (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))))) |
(* -1/4 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) |
(- (* -1/4 (/ (* b (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(- (* -1/4 (/ (* b (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(- (* -1/4 (/ (* b (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(* -1/4 (/ (* b (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) |
(* (pow y-scale 2) (- (* -1/4 (/ (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (pow y-scale 2))) (* 1/4 (/ (* b (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))))) |
(* (pow y-scale 2) (- (* -1/4 (/ (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (pow y-scale 2))) (* 1/4 (/ (* b (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))))) |
(* (pow y-scale 2) (- (* -1/4 (/ (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (pow y-scale 2))) (* 1/4 (/ (* b (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))))) |
(* -1/4 (/ (* b (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) |
(* (pow y-scale 2) (- (* -1/4 (/ (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (pow y-scale 2))) (* 1/4 (/ (* b (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))))) |
(* (pow y-scale 2) (- (* -1/4 (/ (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (pow y-scale 2))) (* 1/4 (/ (* b (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))))) |
(* (pow y-scale 2) (- (* -1/4 (/ (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (pow y-scale 2))) (* 1/4 (/ (* b (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))))) |
(* -45 (/ (* b (* (pow y-scale 2) (* (sqrt 1/2) (sqrt 8)))) (* angle (* (pow x-scale 2) (PI))))) |
(/ (- (* -1 (* (pow angle 2) (* b (+ (* 1/720 (* (PI) (* (sqrt 2) (sqrt 8)))) (* 1/4 (- (* -1/180 (/ (* (pow y-scale 2) (* (PI) (* (sqrt 1/2) (sqrt 8)))) (pow x-scale 2))) (* -1/1080 (/ (* (pow y-scale 2) (* (PI) (* (sqrt 1/2) (sqrt 8)))) (pow x-scale 2))))))))) (* 45 (/ (* b (* (pow y-scale 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow x-scale 2) (PI))))) angle) |
(/ (- (* (pow angle 2) (- (* -1 (* (pow angle 2) (* b (+ (* -1/139968000 (* (pow (PI) 3) (* (sqrt 2) (sqrt 8)))) (* 1/4 (- (* 180 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (PI)))) (+ (* -1/194400 (* (pow (PI) 2) (- (* -1/180 (/ (* (pow y-scale 2) (* (PI) (* (sqrt 1/2) (sqrt 8)))) (pow x-scale 2))) (* -1/1080 (/ (* (pow y-scale 2) (* (PI) (* (sqrt 1/2) (sqrt 8)))) (pow x-scale 2)))))) (* 1/699840000 (/ (* (pow y-scale 2) (* (pow (PI) 3) (* (sqrt 1/2) (sqrt 8)))) (pow x-scale 2)))))))))) (* b (+ (* 1/720 (* (PI) (* (sqrt 2) (sqrt 8)))) (* 1/4 (- (* -1/180 (/ (* (pow y-scale 2) (* (PI) (* (sqrt 1/2) (sqrt 8)))) (pow x-scale 2))) (* -1/1080 (/ (* (pow y-scale 2) (* (PI) (* (sqrt 1/2) (sqrt 8)))) (pow x-scale 2))))))))) (* 45 (/ (* b (* (pow y-scale 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow x-scale 2) (PI))))) angle) |
(/ (- (* (pow angle 2) (- (* (pow angle 2) (- (* -1 (* (pow angle 2) (* b (+ (* 1/90699264000000 (* (pow (PI) 5) (* (sqrt 2) (sqrt 8)))) (* 1/4 (- (* 180 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))))) (* (pow x-scale 2) (PI)))) (+ (* -1/194400 (* (pow (PI) 2) (- (* 180 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (PI)))) (+ (* -1/194400 (* (pow (PI) 2) (- (* -1/180 (/ (* (pow y-scale 2) (* (PI) (* (sqrt 1/2) (sqrt 8)))) (pow x-scale 2))) (* -1/1080 (/ (* (pow y-scale 2) (* (PI) (* (sqrt 1/2) (sqrt 8)))) (pow x-scale 2)))))) (* 1/699840000 (/ (* (pow y-scale 2) (* (pow (PI) 3) (* (sqrt 1/2) (sqrt 8)))) (pow x-scale 2))))))) (+ (* -1/952342272000000 (/ (* (pow y-scale 2) (* (pow (PI) 5) (* (sqrt 1/2) (sqrt 8)))) (pow x-scale 2))) (* 1/125971200000 (* (pow (PI) 4) (- (* -1/180 (/ (* (pow y-scale 2) (* (PI) (* (sqrt 1/2) (sqrt 8)))) (pow x-scale 2))) (* -1/1080 (/ (* (pow y-scale 2) (* (PI) (* (sqrt 1/2) (sqrt 8)))) (pow x-scale 2)))))))))))))) (* b (+ (* -1/139968000 (* (pow (PI) 3) (* (sqrt 2) (sqrt 8)))) (* 1/4 (- (* 180 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (PI)))) (+ (* -1/194400 (* (pow (PI) 2) (- (* -1/180 (/ (* (pow y-scale 2) (* (PI) (* (sqrt 1/2) (sqrt 8)))) (pow x-scale 2))) (* -1/1080 (/ (* (pow y-scale 2) (* (PI) (* (sqrt 1/2) (sqrt 8)))) (pow x-scale 2)))))) (* 1/699840000 (/ (* (pow y-scale 2) (* (pow (PI) 3) (* (sqrt 1/2) (sqrt 8)))) (pow x-scale 2)))))))))) (* b (+ (* 1/720 (* (PI) (* (sqrt 2) (sqrt 8)))) (* 1/4 (- (* -1/180 (/ (* (pow y-scale 2) (* (PI) (* (sqrt 1/2) (sqrt 8)))) (pow x-scale 2))) (* -1/1080 (/ (* (pow y-scale 2) (* (PI) (* (sqrt 1/2) (sqrt 8)))) (pow x-scale 2))))))))) (* 45 (/ (* b (* (pow y-scale 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow x-scale 2) (PI))))) angle) |
(* -1 (* b (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))))) |
(* -1 (* b (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))))) |
(* -1 (* b (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))))) |
(* -1 (* b (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))))) |
(* -1 (* b (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))))) |
(* -1 (* b (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))))) |
(* -1 (* b (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))))) |
(* -1 (* b (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))))) |
(* -1/4 (/ (* b (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) |
(/ (- (* -1/4 (* b (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (* 1/4 (/ (* b (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (sin (* 1/180 (* angle (PI))))))) (pow x-scale 2)) |
(/ (- (* -1/4 (* b (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (* 1/4 (/ (* b (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (sin (* 1/180 (* angle (PI))))))) (pow x-scale 2)) |
(/ (- (* -1/4 (* b (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (* 1/4 (/ (* b (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (sin (* 1/180 (* angle (PI))))))) (pow x-scale 2)) |
(* -1/4 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) |
(- (* -1/4 (/ (* b (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(- (* -1/4 (/ (* b (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(- (* -1/4 (/ (* b (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(* -1/4 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) |
(- (* -1/4 (/ (* b (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(- (* -1/4 (/ (* b (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(- (* -1/4 (/ (* b (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(+ (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))))) |
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) |
(* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))) |
(* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) |
(* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))))) |
(* -1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) |
(* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) |
(* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))))) |
(* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(+ (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))))) |
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) |
(* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) |
(* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) |
(* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))) |
(* -1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) |
(* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) |
(* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))) |
(* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))))) |
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) |
(+ (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) |
(+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))) |
(+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) |
(* -1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) |
(* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) |
(* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))))) |
(* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) |
(+ (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) |
(+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))) |
(+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) |
(* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) |
(* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) |
(* -1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) |
(* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) |
(* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))))) |
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) |
(+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))))))) (* b (sqrt 2)))) (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))) |
(+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))))) (* b (sqrt 2))))))) |
(+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))))) (* b (sqrt 2)))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))))) (* 1/2 (/ (* (pow x-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2)))))))) (* b (sqrt 2))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) x-scale) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(/ (+ (* 1/8 (* (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* (pow x-scale 2) (* y-scale (* (sqrt 2) (sqrt 8)))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) x-scale) |
(/ (+ (* 1/8 (* (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* (pow x-scale 2) (* y-scale (* (sqrt 2) (sqrt 8)))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) x-scale) |
(/ (+ (* 1/8 (* (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* (pow x-scale 2) (* y-scale (* (sqrt 2) (sqrt 8)))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) x-scale) |
(* 1/4 (* (* x-scale (* y-scale (* (sqrt 2) (sqrt 8)))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) |
(* 1/4 (* (* x-scale (* y-scale (* (sqrt 2) (sqrt 8)))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) |
(* -1 (* x-scale (+ (* -1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* -1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) |
(* -1 (* x-scale (+ (* -1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* -1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) |
(* -1 (* x-scale (+ (* -1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* -1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) |
(* 1/4 (* (* x-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) |
(+ (* 1/8 (* (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) x-scale) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* 1/4 (* (* x-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) |
(+ (* 1/8 (* (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) x-scale) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* 1/4 (* (* x-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) |
(+ (* 1/8 (* (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) x-scale) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* 1/4 (* (* x-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) |
(* 1/8 (* (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) x-scale) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) |
(* (pow y-scale 2) (+ (* 1/8 (* (/ (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) x-scale) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* 1/4 (* (/ (* x-scale (* (sqrt 2) (sqrt 8))) (pow y-scale 2)) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) |
(* (pow y-scale 2) (+ (* 1/8 (* (/ (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) x-scale) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* 1/4 (* (/ (* x-scale (* (sqrt 2) (sqrt 8))) (pow y-scale 2)) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) |
(* (pow y-scale 2) (+ (* 1/8 (* (/ (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) x-scale) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* 1/4 (* (/ (* x-scale (* (sqrt 2) (sqrt 8))) (pow y-scale 2)) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) |
(* -1/8 (* (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) x-scale) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) |
(* (pow y-scale 2) (+ (* -1/4 (* (/ (* x-scale (* (sqrt 2) (sqrt 8))) (pow y-scale 2)) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* -1/8 (* (/ (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) x-scale) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) |
(* (pow y-scale 2) (+ (* -1/4 (* (/ (* x-scale (* (sqrt 2) (sqrt 8))) (pow y-scale 2)) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* -1/8 (* (/ (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) x-scale) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) |
(* (pow y-scale 2) (+ (* -1/4 (* (/ (* x-scale (* (sqrt 2) (sqrt 8))) (pow y-scale 2)) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* -1/8 (* (/ (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) x-scale) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) |
(* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (* 1/4 (* a (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))) |
(+ (* 1/4 (/ (* b (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))))))) (* (pow a 3) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (* 1/4 (* a (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))) |
(+ (* b (+ (* 1/4 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))))) (* (pow a 3) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (* b (* x-scale (+ (* 1/8 (+ (* -1/2 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow a 3) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 3))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))))) (* 1/8 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))) (* a (cos (* 1/180 (* angle (PI)))))))))))) (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (* 1/4 (* a (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))) |
(+ (* b (+ (* 1/4 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))))) (* (pow a 3) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (* b (+ (* 1/8 (* b (* x-scale (+ (* -1 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))))) (* (pow a 5) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 3))))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (pow a 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))))))) (* x-scale (+ (* 1/8 (+ (* -1/2 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow a 3) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 3))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))))) (* 1/8 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))) (* a (cos (* 1/180 (* angle (PI))))))))))))) (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (* 1/4 (* a (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))) |
(* b (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))) |
(* b (+ (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))))) (* b (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))) |
(* b (+ (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))))) (* b (* x-scale (sin (* 1/180 (* angle (PI)))))))) (+ (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (/ (* x-scale (+ (* 1/8 (+ (* -1/2 (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))) |
(* b (+ (* 1/8 (/ (* x-scale (+ (* -1 (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 a) (* 2 a))))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* 4 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (+ (* -2 a) (* 2 a)))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))))) (pow b 3))) (+ (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))))) (* b (* x-scale (sin (* 1/180 (* angle (PI)))))))) (+ (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (/ (* x-scale (+ (* 1/8 (+ (* -1/2 (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2)))))) |
(* -1 (* b (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))) |
(* -1 (* b (+ (* -1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))))) (* b (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))) |
(* -1 (* b (+ (* -1 (/ (+ (* -1 (/ (* x-scale (+ (* 1/8 (+ (* -1/2 (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (sin (* 1/180 (* angle (PI)))))))) b)) (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))) b)) (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))) |
(* -1 (* b (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (/ (* x-scale (+ (* -1 (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 a) (* 2 a))))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* 4 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (+ (* -2 a) (* 2 a)))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))))) b)) (* x-scale (+ (* 1/8 (+ (* -1/2 (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (sin (* 1/180 (* angle (PI))))))))) b)) (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))) b)) (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))) |
(* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (pow b 2)) (pow b 2))))) (* a (pow x-scale 2)))) (* 1/4 (* a (* (sqrt 2) (sqrt 8)))))) |
(+ (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (pow b 2)) (pow b 2))))) (* a (pow x-scale 2)))) (* 1/4 (* a (* (sqrt 2) (sqrt 8)))))) (* (pow angle 2) (* x-scale (+ (* 1/8 (+ (* -1/2 (/ (* (pow y-scale 4) (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1 (pow b 2)) (pow b 2)) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))))) (* (pow a 3) (pow x-scale 2)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))))))) (* a (pow x-scale 2))))) (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 2) (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))))) a)))))) |
(+ (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (pow b 2)) (pow b 2))))) (* a (pow x-scale 2)))) (* 1/4 (* a (* (sqrt 2) (sqrt 8)))))) (* (pow angle 2) (+ (* x-scale (+ (* 1/8 (+ (* -1/2 (/ (* (pow y-scale 4) (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1 (pow b 2)) (pow b 2)) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))))) (* (pow a 3) (pow x-scale 2)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))))))) (* a (pow x-scale 2))))) (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 2) (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))))) a)))) (* (pow angle 2) (* x-scale (+ (* 1/8 (+ (* -1/2 (/ (* a (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (+ (* 1/4 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (/ (* (pow y-scale 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (pow a 4)))) (+ (* -1 (pow b 2)) (pow b 2)))))) (pow x-scale 2))) (+ (* -1/2 (/ (* (pow y-scale 4) (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2))))))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))))) (* (pow a 3) (pow x-scale 2)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (+ (* (pow b 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 2))))) (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))))) (pow a 2)) (+ (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))) (pow a 2))) (/ (* (pow y-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))) (pow a 2))))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))) (* a (pow x-scale 2)))))) (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 2) (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 2))))))) a)))))))) |
(+ (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (pow b 2)) (pow b 2))))) (* a (pow x-scale 2)))) (* 1/4 (* a (* (sqrt 2) (sqrt 8)))))) (* (pow angle 2) (+ (* x-scale (+ (* 1/8 (+ (* -1/2 (/ (* (pow y-scale 4) (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1 (pow b 2)) (pow b 2)) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))))) (* (pow a 3) (pow x-scale 2)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))))))) (* a (pow x-scale 2))))) (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 2) (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))))) a)))) (* (pow angle 2) (+ (* x-scale (+ (* 1/8 (+ (* -1/2 (/ (* a (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (+ (* 1/4 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (/ (* (pow y-scale 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (pow a 4)))) (+ (* -1 (pow b 2)) (pow b 2)))))) (pow x-scale 2))) (+ (* -1/2 (/ (* (pow y-scale 4) (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2))))))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))))) (* (pow a 3) (pow x-scale 2)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (+ (* (pow b 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 2))))) (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))))) (pow a 2)) (+ (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))) (pow a 2))) (/ (* (pow y-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))) (pow a 2))))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))) (* a (pow x-scale 2)))))) (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 2) (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 2))))))) a)))) (* (pow angle 2) (* x-scale (+ (* 1/8 (+ (* -1/2 (/ (* a (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1 (/ (* (pow y-scale 2) (* (+ (* -1 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (/ (* (pow y-scale 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (pow a 4))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2))) (+ (* -1 (/ (* (pow y-scale 6) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))) (pow a 6))) (+ (* 1/2 (/ (* (pow y-scale 2) (* (+ (* -1 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (+ (* 1/4 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (/ (* (pow y-scale 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (pow a 4)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2))) (/ (* (pow y-scale 4) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (pow a 4))))) (+ (* -1 (pow b 2)) (pow b 2)))))) (pow x-scale 2))) (+ (* -1/2 (/ (* a (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (+ (* 1/4 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (/ (* (pow y-scale 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (pow a 4)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2))))))))))) (pow x-scale 2))) (+ (* -1/2 (/ (* (pow y-scale 4) (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (+ (* (pow b 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 2))))) (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))))) (pow a 2)) (+ (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))) (pow a 2))) (/ (* (pow y-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))) (pow a 2))))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))))))) (* (pow a 3) (pow x-scale 2)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (+ (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (+ (* (pow b 2) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))))) (pow y-scale 2)))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- b a) 2)))) (pow y-scale 2))) (/ (* (pow (+ a b) 2) (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- b a) 2))) (pow y-scale 2))))))) (pow a 2)) (+ (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))))) (pow a 2))) (+ (/ (* (pow y-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (+ (* (pow b 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 2))))) (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))))) (pow a 2)) (+ (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))) (pow a 2))) (/ (* (pow y-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))) (pow a 2)))))) (pow a 2)) (/ (* (pow y-scale 2) (* (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))) (pow a 2)))))) (+ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6))))))))) (* a (pow x-scale 2))))))) (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 2) (* (sqrt 8) (- (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 2)))))) (pow a 2))))))) a)))))))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) |
(* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/4 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))) |
(+ (* 1/4 (/ (* a (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))))))) (* (pow b 3) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/4 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))) |
(+ (* a (+ (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))))) (* (pow b 3) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* a (* x-scale (+ (* 1/8 (+ (* -1/2 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow b 3) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))))) (* 1/8 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))) (* b (sin (* 1/180 (* angle (PI)))))))))))) (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/4 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))) |
(+ (* a (+ (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))))) (* (pow b 3) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* a (+ (* 1/8 (* a (* x-scale (+ (* -1 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))))) (* (pow b 5) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (pow b 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))))))) (* x-scale (+ (* 1/8 (+ (* -1/2 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow b 3) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))))) (* 1/8 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))) (* b (sin (* 1/180 (* angle (PI))))))))))))) (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/4 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))) |
(* a (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))) |
(* a (+ (* 1/4 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))))) (* a (* x-scale (cos (* 1/180 (* angle (PI)))))))) (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))) |
(* a (+ (* 1/4 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))))) (* a (* x-scale (cos (* 1/180 (* angle (PI)))))))) (+ (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (/ (* x-scale (+ (* 1/8 (+ (* -1/2 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (* 1/8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (cos (* 1/180 (* angle (PI)))))))) (pow a 2))))) |
(* a (+ (* 1/8 (/ (* x-scale (+ (* -1 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 b) (* 2 b))))))) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* 4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (+ (* -2 b) (* 2 b)))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))))) (pow a 3))) (+ (* 1/4 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))))) (* a (* x-scale (cos (* 1/180 (* angle (PI)))))))) (+ (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (/ (* x-scale (+ (* 1/8 (+ (* -1/2 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (* 1/8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (cos (* 1/180 (* angle (PI)))))))) (pow a 2)))))) |
(* -1 (* a (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))) |
(* -1 (* a (+ (* -1/4 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))))) (* a (* x-scale (cos (* 1/180 (* angle (PI)))))))) (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))) |
(* -1 (* a (+ (* -1 (/ (+ (* -1 (/ (* x-scale (+ (* 1/8 (+ (* -1/2 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (* 1/8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (cos (* 1/180 (* angle (PI)))))))) a)) (* 1/4 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))) a)) (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))) |
(* -1 (* a (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (/ (* x-scale (+ (* -1 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 b) (* 2 b))))))) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* 4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (+ (* -2 b) (* 2 b)))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))))) a)) (* x-scale (+ (* 1/8 (+ (* -1/2 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (* 1/8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (cos (* 1/180 (* angle (PI))))))))) a)) (* 1/4 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))) a)) (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))) |
(* b (sqrt 2)) |
(+ (* 1/2 (/ (* (pow angle 2) (* (sqrt 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))))) b)) (* b (sqrt 2))) |
(+ (* b (sqrt 2)) (* (pow angle 2) (+ (* 1/2 (/ (* (sqrt 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) b)) (* 1/2 (/ (* (pow angle 2) (* (sqrt 2) (- (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (* 1/4 (/ (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2) (pow b 2)))))) b))))) |
(+ (* b (sqrt 2)) (* (pow angle 2) (+ (* 1/2 (/ (* (sqrt 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) b)) (* (pow angle 2) (+ (* 1/2 (/ (* (sqrt 2) (- (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (* 1/4 (/ (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2) (pow b 2))))) b)) (* 1/2 (/ (* (pow angle 2) (* (sqrt 2) (- (+ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6))))) (* 1/2 (/ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (- (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (* 1/4 (/ (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2) (pow b 2))))) (pow b 2)))))) b))))))) |
(* (sqrt 2) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) |
(* (sqrt 2) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) |
(* (sqrt 2) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) |
(* (sqrt 2) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) |
(* (sqrt 2) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) |
(* (sqrt 2) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) |
(* (sqrt 2) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) |
(* (sqrt 2) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) |
(* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))) |
(+ (* 1/2 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (sqrt 2))) (* a (sin (* 1/180 (* angle (PI))))))) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) |
(+ (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))) (* (pow b 2) (+ (* -1/8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (sqrt 2))) (* (pow a 3) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* 1/2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (sqrt 2)) (* a (sin (* 1/180 (* angle (PI)))))))))) |
(+ (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))) (* (pow b 2) (+ (* 1/2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (sqrt 2)) (* a (sin (* 1/180 (* angle (PI))))))) (* (pow b 2) (+ (* -1/8 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (sqrt 2)) (* (pow a 3) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* 1/16 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 6) (sqrt 2))) (* (pow a 5) (pow (sin (* 1/180 (* angle (PI)))) 5))))))))) |
(* b (* (cos (* 1/180 (* angle (PI)))) (sqrt 2))) |
(* b (+ (* 1/2 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 2))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* (cos (* 1/180 (* angle (PI)))) (sqrt 2)))) |
(* b (+ (* -1/8 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 2))) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/2 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 2))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* (cos (* 1/180 (* angle (PI)))) (sqrt 2))))) |
(* b (+ (* -1/8 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 2))) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/16 (/ (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (sqrt 2))) (* (pow b 6) (pow (cos (* 1/180 (* angle (PI)))) 5)))) (+ (* 1/2 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 2))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* (cos (* 1/180 (* angle (PI)))) (sqrt 2)))))) |
(* -1 (* b (* (cos (* 1/180 (* angle (PI)))) (sqrt 2)))) |
(* -1 (* b (+ (* 1/2 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 2))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* (cos (* 1/180 (* angle (PI)))) (sqrt 2))))) |
(* -1 (* b (+ (* -1/8 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 2))) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/2 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 2))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* (cos (* 1/180 (* angle (PI)))) (sqrt 2)))))) |
(* -1 (* b (+ (* -1/8 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 2))) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/16 (/ (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (sqrt 2))) (* (pow b 6) (pow (cos (* 1/180 (* angle (PI)))) 5)))) (+ (* 1/2 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 2))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* (cos (* 1/180 (* angle (PI)))) (sqrt 2))))))) |
(* b (* (cos (* 1/180 (* angle (PI)))) (sqrt 2))) |
(+ (* 1/2 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 2))) (* b (cos (* 1/180 (* angle (PI))))))) (* b (* (cos (* 1/180 (* angle (PI)))) (sqrt 2)))) |
(+ (* b (* (cos (* 1/180 (* angle (PI)))) (sqrt 2))) (* (pow a 2) (+ (* -1/8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 2))) (* (pow b 3) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (* 1/2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 2)) (* b (cos (* 1/180 (* angle (PI)))))))))) |
(+ (* b (* (cos (* 1/180 (* angle (PI)))) (sqrt 2))) (* (pow a 2) (+ (* 1/2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 2)) (* b (cos (* 1/180 (* angle (PI))))))) (* (pow a 2) (+ (* -1/8 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 2)) (* (pow b 3) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (* 1/16 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (sqrt 2))) (* (pow b 5) (pow (cos (* 1/180 (* angle (PI)))) 5))))))))) |
(* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))) |
(* a (+ (* 1/2 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (sqrt 2))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) |
(* a (+ (* -1/8 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (sqrt 2))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/2 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (sqrt 2))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) |
(* a (+ (* -1/8 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (sqrt 2))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/16 (/ (* (pow b 6) (* (pow (cos (* 1/180 (* angle (PI)))) 6) (sqrt 2))) (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 5)))) (+ (* 1/2 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (sqrt 2))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))) |
(* -1 (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) |
(* -1 (* a (+ (* 1/2 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (sqrt 2))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) |
(* -1 (* a (+ (* -1/8 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (sqrt 2))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/2 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (sqrt 2))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))) |
(* -1 (* a (+ (* -1/8 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (sqrt 2))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/16 (/ (* (pow b 6) (* (pow (cos (* 1/180 (* angle (PI)))) 6) (sqrt 2))) (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 5)))) (+ (* 1/2 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (sqrt 2))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))) |
1 |
(+ 1 (* -1/64800 (* (pow angle 2) (pow (PI) 2)))) |
(+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* 1/25194240000 (* (pow angle 2) (pow (PI) 4)))))) |
(+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/24488801280000000 (* (pow angle 2) (pow (PI) 6))) (* 1/25194240000 (pow (PI) 4))))))) |
(cos (* 1/180 (* angle (PI)))) |
(cos (* 1/180 (* angle (PI)))) |
(cos (* 1/180 (* angle (PI)))) |
(cos (* 1/180 (* angle (PI)))) |
(cos (* 1/180 (* angle (PI)))) |
(cos (* 1/180 (* angle (PI)))) |
(cos (* 1/180 (* angle (PI)))) |
(cos (* 1/180 (* angle (PI)))) |
(* 1/180 (* angle (PI))) |
(* angle (+ (* -1/34992000 (* (pow angle 2) (pow (PI) 3))) (* 1/180 (PI)))) |
(* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* 1/22674816000000 (* (pow angle 2) (pow (PI) 5))))))) |
(* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* (pow angle 2) (+ (* -1/30855889612800000000 (* (pow angle 2) (pow (PI) 7))) (* 1/22674816000000 (pow (PI) 5)))))))) |
(sin (* 1/180 (* angle (PI)))) |
(sin (* 1/180 (* angle (PI)))) |
(sin (* 1/180 (* angle (PI)))) |
(sin (* 1/180 (* angle (PI)))) |
(sin (* 1/180 (* angle (PI)))) |
(sin (* 1/180 (* angle (PI)))) |
(sin (* 1/180 (* angle (PI)))) |
(sin (* 1/180 (* angle (PI)))) |
1 |
(+ 1 (* -1/64800 (* (pow angle 2) (pow (PI) 2)))) |
(+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* 1/25194240000 (* (pow angle 2) (pow (PI) 4)))))) |
(+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/24488801280000000 (* (pow angle 2) (pow (PI) 6))) (* 1/25194240000 (pow (PI) 4))))))) |
(cos (* 1/180 (* angle (PI)))) |
(cos (* 1/180 (* angle (PI)))) |
(cos (* 1/180 (* angle (PI)))) |
(cos (* 1/180 (* angle (PI)))) |
(cos (* 1/180 (* angle (PI)))) |
(cos (* 1/180 (* angle (PI)))) |
(cos (* 1/180 (* angle (PI)))) |
(cos (* 1/180 (* angle (PI)))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))) |
(+ (* 1/16 (* (/ (* a (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))) (* a (+ (* 1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* 1/8 (* (* a (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (+ (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (sqrt (/ 1 (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))) (* a (+ (* 1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* a (+ (* 1/8 (* (* a (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 (pow b 3)) (* 2 (pow b 3))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (* 1/4 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 (pow b 3)) (* 2 (pow b 3))) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (+ (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))) (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (+ (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))) (sqrt (/ 1 (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))))))) |
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) |
(* a (+ (* 1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))) (* a (* x-scale y-scale))) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) |
(* a (+ (* 1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))) (* a (* x-scale y-scale))) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))))))) (pow a 2)) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))))) |
(* a (+ (* 1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))) (* a (* x-scale y-scale))) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 b) (* 2 b)) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (* 1/4 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 b) (* 2 b)) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))))))) (pow a 3)) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))))))) (pow a 2)) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))))) |
(* -1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) |
(* -1 (* a (+ (* -1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))) (* a (* x-scale y-scale))) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))))) |
(* -1 (* a (+ (* -1 (/ (+ (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))))))) a) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))) (* 1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))))) a)) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))))) |
(* -1 (* a (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 b) (* 2 b)) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (* 1/4 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 b) (* 2 b)) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))))))) a) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))) (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))))))) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) a)) (* 1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))))) a)) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) |
(+ (* 1/16 (* (/ (* b (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* b (+ (* 1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* 1/8 (* (* b (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (+ (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (sqrt (/ 1 (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* b (+ (* 1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* b (+ (* 1/8 (* (* b (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 (pow a 3)) (* 2 (pow a 3))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (* 1/4 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 (pow a 3)) (* 2 (pow a 3))) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (+ (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (+ (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (sqrt (/ 1 (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))))))) |
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))) |
(* b (+ (* 1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))) (* b (* x-scale y-scale))) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) |
(* b (+ (* 1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))) (* b (* x-scale y-scale))) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))))))) (pow b 2)) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))))) |
(* b (+ (* 1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))) (* b (* x-scale y-scale))) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 a) (* 2 a)) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (* 1/4 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 a) (* 2 a)) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))))))) (pow b 3)) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))))))) (pow b 2)) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))))) |
(* -1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))) |
(* -1 (* b (+ (* -1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))) (* b (* x-scale y-scale))) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))))) |
(* -1 (* b (+ (* -1 (/ (+ (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))))))) b) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (* 1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))))) b)) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))))) |
(* -1 (* b (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 a) (* 2 a)) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (* 1/4 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 a) (* 2 a)) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))))))) b) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))))))) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) b)) (* 1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))))) b)) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))))) |
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))) |
(+ (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) |
(+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))))) |
(+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))) (pow x-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))))) |
(* -1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))) |
(* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) |
(* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))))) |
(* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))) (pow x-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))))) |
(* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))) |
(+ (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) |
(+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))))) |
(+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) |
(* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))) |
(* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) |
(* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))) (pow y-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))))) |
(* -1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) |
(* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) |
(* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))))) |
(* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))) (pow y-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))))) |
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) |
(+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))))))) (* b (sqrt 2)))) (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))) |
(+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/2 (/ (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))))) (* b (sqrt 2))))))) |
(+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))))) (* b (sqrt 2)))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow y-scale 2))) (+ (* -1/765275040000000 (/ (* (pow b 2) (pow (PI) 6)) (pow x-scale 2))) (+ (* 1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow x-scale 2))) (+ (* 1/765275040000000 (/ (* (pow b 2) (pow (PI) 6)) (pow y-scale 2))) (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))))) (+ (* 2 (* (- (+ (* -1/765275040000000 (/ (* (pow b 2) (pow (PI) 6)) (pow x-scale 2))) (* 1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow x-scale 2)))) (+ (* -1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow y-scale 2))) (* 1/765275040000000 (/ (* (pow b 2) (pow (PI) 6)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow (+ a b) 2) (* (+ (* 1/31886460000000 (pow (PI) 6)) (* 1/19131876000000 (pow (PI) 6))) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (* 1/2 (/ (* (pow x-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/2 (/ (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/2 (/ (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2)))))))) (* b (sqrt 2))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))) |
1 |
(+ 1 (* -1/16200 (* (pow angle 2) (pow (PI) 2)))) |
(+ 1 (* (pow angle 2) (+ (* -1/16200 (pow (PI) 2)) (* 1/1574640000 (* (pow angle 2) (pow (PI) 4)))))) |
(+ 1 (* (pow angle 2) (+ (* -1/16200 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/382637520000000 (* (pow angle 2) (pow (PI) 6))) (* 1/1574640000 (pow (PI) 4))))))) |
(cos (* 1/90 (* angle (PI)))) |
(cos (* 1/90 (* angle (PI)))) |
(cos (* 1/90 (* angle (PI)))) |
(cos (* 1/90 (* angle (PI)))) |
(cos (* 1/90 (* angle (PI)))) |
(cos (* 1/90 (* angle (PI)))) |
(cos (* 1/90 (* angle (PI)))) |
(cos (* 1/90 (* angle (PI)))) |
(/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) |
(/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) |
(/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) |
(/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) |
(/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) |
(/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) |
(/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) |
(/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) |
(/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) |
(/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) |
(/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) |
(/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) |
(* 1/32400 (/ (* (pow a 2) (* (pow angle 2) (pow (PI) 2))) (pow x-scale 2))) |
(* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow a 2) (* (pow angle 2) (pow (PI) 4))) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))))) |
(* (pow angle 2) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/765275040000000 (/ (* (pow a 2) (* (pow angle 2) (pow (PI) 6))) (pow x-scale 2))))))) |
(* (pow angle 2) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* (pow angle 2) (+ (* -1/347128758144000000000 (/ (* (pow a 2) (* (pow angle 2) (pow (PI) 8))) (pow x-scale 2))) (* 1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow x-scale 2))))))))) |
(/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) |
(/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) |
(/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) |
(/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) |
(/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) |
(/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) |
(/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) |
(/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) |
(/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) |
(/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) |
(/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) |
(/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) |
(/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) |
(/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) |
(/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) |
(/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) |
(/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) |
(/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) |
(/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) |
(/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) |
(* 1/4 (* (* (sqrt 2) (sqrt 8)) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) |
(+ (* 1/8 (* (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* 1/4 (* (* (sqrt 2) (sqrt 8)) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) |
(+ (* 1/8 (* (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* 1/4 (* (* (sqrt 2) (sqrt 8)) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) |
(+ (* 1/8 (* (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* 1/4 (* (* (sqrt 2) (sqrt 8)) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) |
(* 1/8 (* (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) |
(* (pow y-scale 2) (+ (* 1/8 (* (/ (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* 1/4 (* (/ (* (sqrt 2) (sqrt 8)) (pow y-scale 2)) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) |
(* (pow y-scale 2) (+ (* 1/8 (* (/ (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* 1/4 (* (/ (* (sqrt 2) (sqrt 8)) (pow y-scale 2)) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) |
(* (pow y-scale 2) (+ (* 1/8 (* (/ (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* 1/4 (* (/ (* (sqrt 2) (sqrt 8)) (pow y-scale 2)) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) |
(* -1/8 (* (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) |
(* (pow y-scale 2) (+ (* -1/4 (* (/ (* (sqrt 2) (sqrt 8)) (pow y-scale 2)) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* -1/8 (* (/ (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) |
(* (pow y-scale 2) (+ (* -1/4 (* (/ (* (sqrt 2) (sqrt 8)) (pow y-scale 2)) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* -1/8 (* (/ (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) |
(* (pow y-scale 2) (+ (* -1/4 (* (/ (* (sqrt 2) (sqrt 8)) (pow y-scale 2)) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* -1/8 (* (/ (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) |
(+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (* 1/4 (* a (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (+ (* 1/4 (* a (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* b (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))))))) (* (pow a 3) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))))) |
(+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (+ (* 1/4 (* a (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* b (+ (* 1/4 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))))) (* (pow a 3) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (* b (+ (* 1/8 (+ (* -1/2 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow a 3) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 3))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))))) (* 1/8 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))) (* a (cos (* 1/180 (* angle (PI))))))))))))) |
(+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (+ (* 1/4 (* a (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* b (+ (* 1/4 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))))) (* (pow a 3) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (* b (+ (* 1/8 (* b (+ (* -1 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))))) (* (pow a 5) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 3))))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (pow a 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))))))) (+ (* 1/8 (+ (* -1/2 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow a 3) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 3))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))))) (* 1/8 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))) (* a (cos (* 1/180 (* angle (PI)))))))))))))) |
(* b (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(* b (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))))))) |
(* b (+ (* 1/8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (* (pow b 2) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/8 (/ (+ (* -1/2 (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (pow b 2))) (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))))))))) |
(* b (+ (* 1/8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (* (pow b 2) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/8 (/ (+ (* -1 (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 a) (* 2 a))))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* 4 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (+ (* -2 a) (* 2 a)))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (pow b 3))) (+ (* 1/8 (/ (+ (* -1/2 (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (pow b 2))) (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))))))))) |
(* -1 (* b (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))) |
(* -1 (* b (+ (* -1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))) |
(* -1 (* b (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/8 (+ (* -1/2 (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (sin (* 1/180 (* angle (PI))))))) b)) (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) b)) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))) |
(* -1 (* b (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (/ (+ (* -1 (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 a) (* 2 a))))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* 4 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (+ (* -2 a) (* 2 a)))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) b)) (+ (* 1/8 (+ (* -1/2 (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (sin (* 1/180 (* angle (PI)))))))) b)) (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) b)) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))) |
(+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (pow b 2)) (pow b 2))))) (* a (pow x-scale 2)))) (* 1/4 (* a (* (sqrt 2) (sqrt 8))))) |
(+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (pow b 2)) (pow b 2))))) (* a (pow x-scale 2)))) (+ (* 1/4 (* a (* (sqrt 2) (sqrt 8)))) (* (pow angle 2) (+ (* 1/8 (+ (* -1/2 (/ (* (pow y-scale 4) (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1 (pow b 2)) (pow b 2)) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))))) (* (pow a 3) (pow x-scale 2)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))))))) (* a (pow x-scale 2))))) (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 2) (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))))) a)))))) |
(+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (pow b 2)) (pow b 2))))) (* a (pow x-scale 2)))) (+ (* 1/4 (* a (* (sqrt 2) (sqrt 8)))) (* (pow angle 2) (+ (* 1/8 (+ (* -1/2 (/ (* (pow y-scale 4) (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1 (pow b 2)) (pow b 2)) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))))) (* (pow a 3) (pow x-scale 2)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))))))) (* a (pow x-scale 2))))) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 2) (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))))) a)) (* (pow angle 2) (+ (* 1/8 (+ (* -1/2 (/ (* a (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (+ (* 1/4 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (/ (* (pow y-scale 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (pow a 4)))) (+ (* -1 (pow b 2)) (pow b 2)))))) (pow x-scale 2))) (+ (* -1/2 (/ (* (pow y-scale 4) (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2))))))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))))) (* (pow a 3) (pow x-scale 2)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (+ (* (pow b 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 2))))) (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))))) (pow a 2)) (+ (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))) (pow a 2))) (/ (* (pow y-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))) (pow a 2))))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))) (* a (pow x-scale 2)))))) (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 2) (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 2))))))) a))))))))) |
(+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (pow b 2)) (pow b 2))))) (* a (pow x-scale 2)))) (+ (* 1/4 (* a (* (sqrt 2) (sqrt 8)))) (* (pow angle 2) (+ (* 1/8 (+ (* -1/2 (/ (* (pow y-scale 4) (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1 (pow b 2)) (pow b 2)) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))))) (* (pow a 3) (pow x-scale 2)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))))))) (* a (pow x-scale 2))))) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 2) (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))))) a)) (* (pow angle 2) (+ (* 1/8 (+ (* -1/2 (/ (* a (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (+ (* 1/4 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (/ (* (pow y-scale 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (pow a 4)))) (+ (* -1 (pow b 2)) (pow b 2)))))) (pow x-scale 2))) (+ (* -1/2 (/ (* (pow y-scale 4) (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2))))))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))))) (* (pow a 3) (pow x-scale 2)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (+ (* (pow b 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 2))))) (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))))) (pow a 2)) (+ (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))) (pow a 2))) (/ (* (pow y-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))) (pow a 2))))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))) (* a (pow x-scale 2)))))) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 2) (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 2))))))) a)) (* (pow angle 2) (+ (* 1/8 (+ (* -1/2 (/ (* a (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1 (/ (* (pow y-scale 2) (* (+ (* -1 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (/ (* (pow y-scale 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (pow a 4))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2))) (+ (* -1 (/ (* (pow y-scale 6) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))) (pow a 6))) (+ (* 1/2 (/ (* (pow y-scale 2) (* (+ (* -1 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (+ (* 1/4 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (/ (* (pow y-scale 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (pow a 4)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2))) (/ (* (pow y-scale 4) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (pow a 4))))) (+ (* -1 (pow b 2)) (pow b 2)))))) (pow x-scale 2))) (+ (* -1/2 (/ (* a (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (+ (* 1/4 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (/ (* (pow y-scale 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (pow a 4)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2))))))))))) (pow x-scale 2))) (+ (* -1/2 (/ (* (pow y-scale 4) (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (+ (* (pow b 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 2))))) (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))))) (pow a 2)) (+ (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))) (pow a 2))) (/ (* (pow y-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))) (pow a 2))))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))))))) (* (pow a 3) (pow x-scale 2)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (+ (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (+ (* (pow b 2) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))))) (pow y-scale 2)))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- b a) 2)))) (pow y-scale 2))) (/ (* (pow (+ a b) 2) (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- b a) 2))) (pow y-scale 2))))))) (pow a 2)) (+ (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))))) (pow a 2))) (+ (/ (* (pow y-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (+ (* (pow b 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 2))))) (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))))) (pow a 2)) (+ (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))) (pow a 2))) (/ (* (pow y-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))) (pow a 2)))))) (pow a 2)) (/ (* (pow y-scale 2) (* (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))) (pow a 2)))))) (+ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6))))))))) (* a (pow x-scale 2))))))) (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 2) (* (sqrt 8) (- (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 2)))))) (pow a 2))))))) a)))))))))))) |
(+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/4 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (+ (* 1/4 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* a (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))))))) (* (pow b 3) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))))) |
(+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (+ (* 1/4 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* a (+ (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))))) (* (pow b 3) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* a (+ (* 1/8 (+ (* -1/2 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow b 3) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))))) (* 1/8 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))) (* b (sin (* 1/180 (* angle (PI))))))))))))) |
(+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (+ (* 1/4 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* a (+ (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))))) (* (pow b 3) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* a (+ (* 1/8 (* a (+ (* -1 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))))) (* (pow b 5) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (pow b 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))))))) (+ (* 1/8 (+ (* -1/2 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow b 3) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))))) (* 1/8 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))) (* b (sin (* 1/180 (* angle (PI)))))))))))))) |
(* a (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(* a (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (+ (* 1/4 (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))))))) |
(* a (+ (* 1/8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (* (pow a 2) (cos (* 1/180 (* angle (PI))))))) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (+ (* 1/8 (/ (+ (* -1/2 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/4 (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))))))))) |
(* a (+ (* 1/8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (* (pow a 2) (cos (* 1/180 (* angle (PI))))))) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (+ (* 1/8 (/ (+ (* -1 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 b) (* 2 b))))))) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* 4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (+ (* -2 b) (* 2 b)))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (pow a 3))) (+ (* 1/8 (/ (+ (* -1/2 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/4 (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))))))))) |
(* -1 (* a (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))) |
(* -1 (* a (+ (* -1/4 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))) |
(* -1 (* a (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/8 (+ (* -1/2 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (* 1/8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (cos (* 1/180 (* angle (PI))))))) a)) (* 1/4 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) a)) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))) |
(* -1 (* a (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (/ (+ (* -1 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 b) (* 2 b))))))) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* 4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (+ (* -2 b) (* 2 b)))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) a)) (+ (* 1/8 (+ (* -1/2 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (* 1/8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (cos (* 1/180 (* angle (PI)))))))) a)) (* 1/4 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) a)) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))) |
(* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(/ (+ (* 1/8 (* (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* (pow x-scale 2) (* y-scale (* (sqrt 2) (sqrt 8)))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow x-scale 2)) |
(/ (+ (* 1/8 (* (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* (pow x-scale 2) (* y-scale (* (sqrt 2) (sqrt 8)))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow x-scale 2)) |
(/ (+ (* 1/8 (* (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* (pow x-scale 2) (* y-scale (* (sqrt 2) (sqrt 8)))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow x-scale 2)) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) |
(+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) |
(+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(* 2 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) |
(* 2 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) |
(* 2 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) |
(* 2 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) |
(* 2 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) |
(* 2 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) |
(* 2 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) |
(* 2 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) |
(* 2 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) |
(* 2 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) |
(* 2 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) |
(* 2 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) |
(* 1/16200 (* (pow angle 2) (pow (PI) 2))) |
(* (pow angle 2) (+ (* 1/16200 (pow (PI) 2)) (* 2 (* (pow angle 2) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4))))))) |
(* (pow angle 2) (+ (* 1/16200 (pow (PI) 2)) (* (pow angle 2) (+ (* 2 (* (pow angle 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (+ (* 1/1224440064000000 (pow (PI) 6)) (+ (* 1/102036672000000 (pow (PI) 6)) (* 1/32400 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))))))) (* 2 (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))))))) |
(* (pow angle 2) (+ (* 1/16200 (pow (PI) 2)) (* (pow angle 2) (+ (* 2 (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow angle 2) (+ (* 2 (* (pow angle 2) (+ (* -1/32400 (* (pow (PI) 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))) (+ (* -1/3149280000 (* (pow (PI) 4) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (+ (* -1/396718580736000000000 (pow (PI) 8)) (+ (* -1/2777030065152000000000 (pow (PI) 8)) (* 1/32400 (* (pow (PI) 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6))))))))))) (* 2 (+ (* 1/2040733440000000 (pow (PI) 6)) (+ (* 1/1224440064000000 (pow (PI) 6)) (+ (* 1/102036672000000 (pow (PI) 6)) (* 1/32400 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))))))))) |
(* 2 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) |
(* 2 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) |
(* 2 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) |
(* 2 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) |
(* 2 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) |
(* 2 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) |
(* 2 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) |
(* 2 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) |
| Outputs |
|---|
1 |
#s(literal 1 binary64) |
(+ 1 (* -1/32400 (* (pow angle 2) (pow (PI) 2)))) |
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 angle angle)) (*.f64 (PI.f64) (PI.f64)))) |
(+ 1 (* (pow angle 2) (+ (* -1/32400 (pow (PI) 2)) (* (pow angle 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) |
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 angle angle) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)))))) |
(+ 1 (* (pow angle 2) (+ (* -1/32400 (pow (PI) 2)) (* (pow angle 2) (+ (* 1/12597120000 (pow (PI) 4)) (+ (* 1/4199040000 (pow (PI) 4)) (* (pow angle 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))))))))) |
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 angle angle) (fma.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64) (*.f64 (*.f64 angle angle) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64)))))))) |
(pow (cos (* 1/180 (* angle (PI)))) 2) |
(pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) |
(pow (cos (* 1/180 (* angle (PI)))) 2) |
(pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) |
(pow (cos (* 1/180 (* angle (PI)))) 2) |
(pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) |
(pow (cos (* 1/180 (* angle (PI)))) 2) |
(pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) |
(pow (cos (* 1/180 (* angle (PI)))) 2) |
(pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) |
(pow (cos (* 1/180 (* angle (PI)))) 2) |
(pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) |
(pow (cos (* 1/180 (* angle (PI)))) 2) |
(pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) |
(pow (cos (* 1/180 (* angle (PI)))) 2) |
(pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) |
(+ (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) |
(fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (*.f64 (*.f64 b b) x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 b b) (*.f64 #s(literal 1/8 binary64) (fma.f64 x-scale (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 (*.f64 (*.f64 b b) x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/8 binary64) (*.f64 x-scale (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) (*.f64 (*.f64 b b) (*.f64 #s(literal 1/8 binary64) (fma.f64 x-scale (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 (*.f64 (*.f64 b b) x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (*.f64 (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))))))) |
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) |
(* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))) |
(*.f64 b (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 b b)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))))) |
(* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) |
(*.f64 b (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 b b)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))))) (pow.f64 b #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))))) |
(* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))))) |
(*.f64 b (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 b b)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (*.f64 (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))))) (pow.f64 b #s(literal 6 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))))) (pow.f64 b #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))))))) |
(* -1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) |
(*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 b (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) |
(* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) |
(neg.f64 (*.f64 b (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 b b)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))))) |
(* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))))) |
(neg.f64 (*.f64 b (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 b b)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))))) (pow.f64 b #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))))))) |
(* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))))) |
(neg.f64 (*.f64 b (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 b b)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (*.f64 (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))))) (pow.f64 b #s(literal 6 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))))) (pow.f64 b #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) |
(+ (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) |
(fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (*.f64 (*.f64 a a) x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 a a) (*.f64 #s(literal 1/8 binary64) (fma.f64 x-scale (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 (*.f64 (*.f64 a a) x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/8 binary64) (*.f64 x-scale (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) (*.f64 (*.f64 a a) (*.f64 #s(literal 1/8 binary64) (fma.f64 x-scale (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 (*.f64 (*.f64 a a) x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (*.f64 (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))))))) |
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 a (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) |
(* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) |
(*.f64 a (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (*.f64 a a)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))))) |
(* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) |
(*.f64 a (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (*.f64 a a)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))))) (pow.f64 a #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))))) |
(* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))) |
(*.f64 a (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (*.f64 a a)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (*.f64 (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))))) (pow.f64 a #s(literal 6 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))))) (pow.f64 a #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))))))) |
(* -1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) |
(*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 a (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) |
(* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) |
(neg.f64 (*.f64 a (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (*.f64 a a)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))))) |
(* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))) |
(neg.f64 (*.f64 a (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (*.f64 a a)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))))) (pow.f64 a #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))))))) |
(* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))))) |
(neg.f64 (*.f64 a (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (*.f64 a a)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (*.f64 (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))))) (pow.f64 a #s(literal 6 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))))) (pow.f64 a #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))))))) |
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) |
(+ (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) |
(fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) |
(+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 #s(literal 1/8 binary64) (fma.f64 y-scale (*.f64 (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))))))) |
(+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 #s(literal 1/8 binary64) (fma.f64 y-scale (*.f64 (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) |
(*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) (pow.f64 x-scale #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) |
(*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) (pow.f64 x-scale #s(literal 6 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) (pow.f64 x-scale #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))))) |
(* -1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) |
(* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) |
(neg.f64 (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))) |
(* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) |
(neg.f64 (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) (pow.f64 x-scale #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))))) |
(* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))))) |
(neg.f64 (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) (pow.f64 x-scale #s(literal 6 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) (pow.f64 x-scale #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))))) |
(* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) |
(+ (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) |
(fma.f64 #s(literal 1/8 binary64) (*.f64 x-scale (*.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) |
(+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 (*.f64 y-scale y-scale) (*.f64 #s(literal 1/8 binary64) (fma.f64 x-scale (*.f64 (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 x-scale (*.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))))))) |
(+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 y-scale y-scale) (*.f64 #s(literal 1/8 binary64) (fma.f64 x-scale (*.f64 (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 x-scale (*.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) |
(* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) |
(*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) |
(* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) |
(*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) (pow.f64 y-scale #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))) |
(* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) |
(*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)))))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) (pow.f64 y-scale #s(literal 6 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) (pow.f64 y-scale #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))))) |
(* -1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) |
(* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) |
(neg.f64 (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))) |
(* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) |
(neg.f64 (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) (pow.f64 y-scale #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))))) |
(* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))))) |
(neg.f64 (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)))))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) (pow.f64 y-scale #s(literal 6 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) (pow.f64 y-scale #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))))) |
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) |
(+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))))))) (* b (sqrt 2)))) (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))) |
(fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 angle angle) (*.f64 x-scale x-scale)) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))))) (*.f64 b (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))) |
(+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))))) (* b (sqrt 2))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b y-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (*.f64 angle angle) (*.f64 #s(literal 1/8 binary64) (+.f64 (/.f64 (*.f64 (*.f64 (*.f64 angle angle) (*.f64 x-scale x-scale)) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal -1/787320000 binary64)) (pow.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))))) (*.f64 b (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))))) (*.f64 b (sqrt.f64 #s(literal 2 binary64)))))))) |
(+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))))) (* b (sqrt 2)))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))))) (* 1/2 (/ (* (pow x-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2)))))))) (* b (sqrt 2))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b y-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))))) (*.f64 b (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 angle angle) (*.f64 #s(literal 1/8 binary64) (+.f64 (/.f64 (*.f64 (*.f64 (*.f64 angle angle) (*.f64 x-scale x-scale)) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)))) (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))))) (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (fma.f64 #s(literal 1/102036672000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (+.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal -1/787320000 binary64)) (pow.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (+.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))))) (+.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal -1/787320000 binary64)) (pow.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))))) (*.f64 (*.f64 b b) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))))) (*.f64 b (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal -1/787320000 binary64)) (pow.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))))) (*.f64 b (sqrt.f64 #s(literal 2 binary64)))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) |
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) |
(+ (* 1/8 (/ (* (pow angle 2) (* y-scale (* (sqrt 2) (* (sqrt 8) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))))))) b)) (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))) |
(fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 angle angle) y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64)))))) b) (*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))) |
(+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* y-scale (* (sqrt 2) (* (sqrt 8) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))))) b)) (* 1/8 (/ (* (pow angle 2) (* y-scale (* (sqrt 2) (* (sqrt 8) (- (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (* 1/4 (/ (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2) (pow b 2)))))))) b))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b y-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (*.f64 angle angle) (*.f64 #s(literal 1/8 binary64) (+.f64 (/.f64 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64)))))) b) (/.f64 (*.f64 (*.f64 (*.f64 angle angle) y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64)))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))))) (*.f64 b b)))))) b))))) |
(+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* y-scale (* (sqrt 2) (* (sqrt 8) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))))) b)) (* (pow angle 2) (+ (* 1/8 (/ (* y-scale (* (sqrt 2) (* (sqrt 8) (- (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (* 1/4 (/ (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2) (pow b 2))))))) b)) (* 1/8 (/ (* (pow angle 2) (* y-scale (* (sqrt 2) (* (sqrt 8) (- (+ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6))))) (* 1/2 (/ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (- (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (* 1/4 (/ (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2) (pow b 2))))) (pow b 2)))))))) b))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b y-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64)))))) b) (*.f64 (*.f64 angle angle) (*.f64 #s(literal 1/8 binary64) (+.f64 (/.f64 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64)))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))))) (*.f64 b b)))))) b) (/.f64 (*.f64 (*.f64 (*.f64 angle angle) y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (fma.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64)))) (+.f64 (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64)))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))))) (*.f64 b b))))) (*.f64 b b)))))) b))))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) |
(* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(+ (* 1/8 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* a (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))) |
(fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 a (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))) |
(+ (* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (* (pow b 2) (+ (* -1/32 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow a 3) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* 1/8 (/ (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (* a (sin (* 1/180 (* angle (PI)))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 a (*.f64 a a)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 y-scale (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 a (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) |
(+ (* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (* (pow b 2) (+ (* 1/8 (/ (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (* a (sin (* 1/180 (* angle (PI))))))) (* (pow b 2) (+ (* -1/32 (/ (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8)))) (* (pow a 3) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* 1/64 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 6) (* (sqrt 2) (sqrt 8))))) (* (pow a 5) (pow (sin (* 1/180 (* angle (PI)))) 5))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 a (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 a (*.f64 a a)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (/.f64 (*.f64 #s(literal 1/64 binary64) (*.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 (pow.f64 a #s(literal 5 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64))))))))) |
(* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(* b (+ (* 1/8 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))) |
(*.f64 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 b b) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))) |
(* b (+ (* -1/32 (/ (* (pow a 4) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/8 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))) |
(*.f64 b (fma.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 b b) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))) |
(* b (+ (* -1/32 (/ (* (pow a 4) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/64 (/ (* (pow a 6) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 6) (* (sqrt 2) (sqrt 8))))) (* (pow b 6) (pow (cos (* 1/180 (* angle (PI)))) 5)))) (+ (* 1/8 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))) |
(*.f64 b (fma.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/64 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 6 binary64)) y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 b b) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))) |
(* -1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 b y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(* -1 (* b (+ (* 1/8 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))) |
(neg.f64 (*.f64 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 b b) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))) |
(* -1 (* b (+ (* -1/32 (/ (* (pow a 4) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/8 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))) |
(neg.f64 (*.f64 b (fma.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 b b) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))) |
(* -1 (* b (+ (* -1/32 (/ (* (pow a 4) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/64 (/ (* (pow a 6) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 6) (* (sqrt 2) (sqrt 8))))) (* (pow b 6) (pow (cos (* 1/180 (* angle (PI)))) 5)))) (+ (* 1/8 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))))) |
(neg.f64 (*.f64 b (fma.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/64 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 6 binary64)) y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 b b) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))))) |
(* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(+ (* 1/8 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* b (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))) |
(fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 b (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))) |
(+ (* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (* (pow a 2) (+ (* -1/32 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow b 3) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (* 1/8 (/ (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (* b (cos (* 1/180 (* angle (PI)))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 b (*.f64 b b)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 b (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) |
(+ (* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (* (pow a 2) (+ (* 1/8 (/ (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (* b (cos (* 1/180 (* angle (PI))))))) (* (pow a 2) (+ (* -1/32 (/ (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8)))) (* (pow b 3) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (* 1/64 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 6) (* (sqrt 2) (sqrt 8))))) (* (pow b 5) (pow (cos (* 1/180 (* angle (PI)))) 5))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 b (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 b (*.f64 b b)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (/.f64 (*.f64 #s(literal 1/64 binary64) (*.f64 (*.f64 (*.f64 a a) y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 (pow.f64 b #s(literal 5 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64))))))))) |
(* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(* a (+ (* 1/8 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))) |
(*.f64 a (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))) |
(* a (+ (* -1/32 (/ (* (pow b 4) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/8 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))) |
(*.f64 a (fma.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))) |
(* a (+ (* -1/32 (/ (* (pow b 4) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/64 (/ (* (pow b 6) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 6) (* (sqrt 2) (sqrt 8))))) (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 5)))) (+ (* 1/8 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))) |
(*.f64 a (fma.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/64 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 6 binary64)) y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))) |
(* -1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 a y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(* -1 (* a (+ (* 1/8 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))) |
(neg.f64 (*.f64 a (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))) |
(* -1 (* a (+ (* -1/32 (/ (* (pow b 4) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/8 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))) |
(neg.f64 (*.f64 a (fma.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))) |
(* -1 (* a (+ (* -1/32 (/ (* (pow b 4) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/64 (/ (* (pow b 6) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 6) (* (sqrt 2) (sqrt 8))))) (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 5)))) (+ (* 1/8 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))))) |
(neg.f64 (*.f64 a (fma.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/64 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 6 binary64)) y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))))) |
(* 1/4 (* y-scale (sqrt 8))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) |
(* 1/4 (* y-scale (sqrt 8))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) |
(* 1/4 (* y-scale (sqrt 8))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) |
(* 1/4 (* y-scale (sqrt 8))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) |
(* 1/4 (* y-scale (sqrt 8))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) |
(* 1/4 (* y-scale (sqrt 8))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) |
(* 1/4 (* y-scale (sqrt 8))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) |
(* 1/4 (* y-scale (sqrt 8))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) |
(* 1/4 (* y-scale (sqrt 8))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) |
(* 1/4 (* y-scale (sqrt 8))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) |
(* 1/4 (* y-scale (sqrt 8))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) |
(* 1/4 (* y-scale (sqrt 8))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) |
(* b y-scale) |
(*.f64 b y-scale) |
(* b y-scale) |
(*.f64 b y-scale) |
(* b y-scale) |
(*.f64 b y-scale) |
(* b y-scale) |
(*.f64 b y-scale) |
(* b y-scale) |
(*.f64 b y-scale) |
(* b y-scale) |
(*.f64 b y-scale) |
(* b y-scale) |
(*.f64 b y-scale) |
(* b y-scale) |
(*.f64 b y-scale) |
(* b y-scale) |
(*.f64 b y-scale) |
(* b y-scale) |
(*.f64 b y-scale) |
(* b y-scale) |
(*.f64 b y-scale) |
(* b y-scale) |
(*.f64 b y-scale) |
(* b y-scale) |
(*.f64 b y-scale) |
(* b y-scale) |
(*.f64 b y-scale) |
(* b y-scale) |
(*.f64 b y-scale) |
(* b y-scale) |
(*.f64 b y-scale) |
(* b y-scale) |
(*.f64 b y-scale) |
(* b y-scale) |
(*.f64 b y-scale) |
(* b y-scale) |
(*.f64 b y-scale) |
(* b y-scale) |
(*.f64 b y-scale) |
(* b y-scale) |
(*.f64 b y-scale) |
(* b y-scale) |
(*.f64 b y-scale) |
(* b y-scale) |
(*.f64 b y-scale) |
(* b y-scale) |
(*.f64 b y-scale) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) |
(+ (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) |
(fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (*.f64 (*.f64 b b) x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 b b) (*.f64 #s(literal 1/8 binary64) (fma.f64 x-scale (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 (*.f64 (*.f64 b b) x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/8 binary64) (*.f64 x-scale (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) (*.f64 (*.f64 b b) (*.f64 #s(literal 1/8 binary64) (fma.f64 x-scale (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 (*.f64 (*.f64 b b) x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (*.f64 (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))))))) |
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) |
(* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))) |
(*.f64 b (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 b b)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))))) |
(* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) |
(*.f64 b (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 b b)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))))) (pow.f64 b #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))))) |
(* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))))) |
(*.f64 b (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 b b)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (*.f64 (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))))) (pow.f64 b #s(literal 6 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))))) (pow.f64 b #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))))))) |
(* -1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) |
(*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 b (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) |
(* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) |
(neg.f64 (*.f64 b (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 b b)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))))) |
(* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))))) |
(neg.f64 (*.f64 b (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 b b)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))))) (pow.f64 b #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))))))) |
(* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))))) |
(neg.f64 (*.f64 b (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 b b)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (*.f64 (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))))) (pow.f64 b #s(literal 6 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))))) (pow.f64 b #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) |
(+ (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) |
(fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (*.f64 (*.f64 a a) x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 a a) (*.f64 #s(literal 1/8 binary64) (fma.f64 x-scale (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 (*.f64 (*.f64 a a) x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/8 binary64) (*.f64 x-scale (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) (*.f64 (*.f64 a a) (*.f64 #s(literal 1/8 binary64) (fma.f64 x-scale (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 (*.f64 (*.f64 a a) x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (*.f64 (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))))))) |
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 a (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) |
(* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) |
(*.f64 a (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (*.f64 a a)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))))) |
(* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) |
(*.f64 a (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (*.f64 a a)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))))) (pow.f64 a #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))))) |
(* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))) |
(*.f64 a (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (*.f64 a a)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (*.f64 (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))))) (pow.f64 a #s(literal 6 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))))) (pow.f64 a #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))))))) |
(* -1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) |
(*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 a (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) |
(* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) |
(neg.f64 (*.f64 a (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (*.f64 a a)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))))) |
(* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))) |
(neg.f64 (*.f64 a (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (*.f64 a a)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))))) (pow.f64 a #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))))))) |
(* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))))) |
(neg.f64 (*.f64 a (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (*.f64 a a)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (*.f64 (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))))) (pow.f64 a #s(literal 6 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))))) (pow.f64 a #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))))))) |
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) |
(+ (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) |
(fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) |
(+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 #s(literal 1/8 binary64) (fma.f64 y-scale (*.f64 (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))))))) |
(+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 #s(literal 1/8 binary64) (fma.f64 y-scale (*.f64 (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) |
(*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) (pow.f64 x-scale #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) |
(*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) (pow.f64 x-scale #s(literal 6 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) (pow.f64 x-scale #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))))) |
(* -1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) |
(* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) |
(neg.f64 (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))) |
(* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) |
(neg.f64 (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) (pow.f64 x-scale #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))))) |
(* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))))) |
(neg.f64 (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) (pow.f64 x-scale #s(literal 6 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) (pow.f64 x-scale #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))))) |
(* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) |
(+ (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) |
(fma.f64 #s(literal 1/8 binary64) (*.f64 x-scale (*.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) |
(+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 (*.f64 y-scale y-scale) (*.f64 #s(literal 1/8 binary64) (fma.f64 x-scale (*.f64 (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 x-scale (*.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))))))) |
(+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 y-scale y-scale) (*.f64 #s(literal 1/8 binary64) (fma.f64 x-scale (*.f64 (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 x-scale (*.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) |
(* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) |
(*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) |
(* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) |
(*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) (pow.f64 y-scale #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))) |
(* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) |
(*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)))))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) (pow.f64 y-scale #s(literal 6 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) (pow.f64 y-scale #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))))) |
(* -1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) |
(* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) |
(neg.f64 (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))) |
(* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) |
(neg.f64 (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) (pow.f64 y-scale #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))))) |
(* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))))) |
(neg.f64 (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)))))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) (pow.f64 y-scale #s(literal 6 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) (pow.f64 y-scale #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))))) |
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) |
(+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))))))) (* b (sqrt 2)))) (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))) |
(fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 angle angle) (*.f64 x-scale x-scale)) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))))) (*.f64 b (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))) |
(+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))))) (* b (sqrt 2))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b y-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (*.f64 angle angle) (*.f64 #s(literal 1/8 binary64) (+.f64 (/.f64 (*.f64 (*.f64 (*.f64 angle angle) (*.f64 x-scale x-scale)) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal -1/787320000 binary64)) (pow.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))))) (*.f64 b (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))))) (*.f64 b (sqrt.f64 #s(literal 2 binary64)))))))) |
(+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))))) (* b (sqrt 2)))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))))) (* 1/2 (/ (* (pow x-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2)))))))) (* b (sqrt 2))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b y-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))))) (*.f64 b (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 angle angle) (*.f64 #s(literal 1/8 binary64) (+.f64 (/.f64 (*.f64 (*.f64 (*.f64 angle angle) (*.f64 x-scale x-scale)) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)))) (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))))) (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (fma.f64 #s(literal 1/102036672000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (+.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal -1/787320000 binary64)) (pow.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (+.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))))) (+.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal -1/787320000 binary64)) (pow.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))))) (*.f64 (*.f64 b b) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))))) (*.f64 b (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal -1/787320000 binary64)) (pow.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))))) (*.f64 b (sqrt.f64 #s(literal 2 binary64)))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) |
(* 4 y-scale) |
(*.f64 #s(literal 4 binary64) y-scale) |
(* 4 y-scale) |
(*.f64 #s(literal 4 binary64) y-scale) |
(* 4 y-scale) |
(*.f64 #s(literal 4 binary64) y-scale) |
(* 4 y-scale) |
(*.f64 #s(literal 4 binary64) y-scale) |
(* 4 y-scale) |
(*.f64 #s(literal 4 binary64) y-scale) |
(* 4 y-scale) |
(*.f64 #s(literal 4 binary64) y-scale) |
(* 4 y-scale) |
(*.f64 #s(literal 4 binary64) y-scale) |
(* 4 y-scale) |
(*.f64 #s(literal 4 binary64) y-scale) |
(* 4 y-scale) |
(*.f64 #s(literal 4 binary64) y-scale) |
(* 4 y-scale) |
(*.f64 #s(literal 4 binary64) y-scale) |
(* 4 y-scale) |
(*.f64 #s(literal 4 binary64) y-scale) |
(* 4 y-scale) |
(*.f64 #s(literal 4 binary64) y-scale) |
(* 1/4 b) |
(*.f64 #s(literal 1/4 binary64) b) |
(* 1/4 b) |
(*.f64 #s(literal 1/4 binary64) b) |
(* 1/4 b) |
(*.f64 #s(literal 1/4 binary64) b) |
(* 1/4 b) |
(*.f64 #s(literal 1/4 binary64) b) |
(* 1/4 b) |
(*.f64 #s(literal 1/4 binary64) b) |
(* 1/4 b) |
(*.f64 #s(literal 1/4 binary64) b) |
(* 1/4 b) |
(*.f64 #s(literal 1/4 binary64) b) |
(* 1/4 b) |
(*.f64 #s(literal 1/4 binary64) b) |
(* 1/4 b) |
(*.f64 #s(literal 1/4 binary64) b) |
(* 1/4 b) |
(*.f64 #s(literal 1/4 binary64) b) |
(* 1/4 b) |
(*.f64 #s(literal 1/4 binary64) b) |
(* 1/4 b) |
(*.f64 #s(literal 1/4 binary64) b) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) |
(+ (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) |
(fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (*.f64 (*.f64 b b) x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 b b) (*.f64 #s(literal 1/8 binary64) (fma.f64 x-scale (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 (*.f64 (*.f64 b b) x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/8 binary64) (*.f64 x-scale (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) (*.f64 (*.f64 b b) (*.f64 #s(literal 1/8 binary64) (fma.f64 x-scale (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 (*.f64 (*.f64 b b) x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (*.f64 (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))))))) |
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) |
(* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))) |
(*.f64 b (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 b b)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))))) |
(* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) |
(*.f64 b (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 b b)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))))) (pow.f64 b #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))))) |
(* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))))) |
(*.f64 b (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 b b)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (*.f64 (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))))) (pow.f64 b #s(literal 6 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))))) (pow.f64 b #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))))))) |
(* -1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) |
(*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 b (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) |
(* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) |
(neg.f64 (*.f64 b (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 b b)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))))) |
(* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))))) |
(neg.f64 (*.f64 b (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 b b)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))))) (pow.f64 b #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))))))) |
(* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))))) |
(neg.f64 (*.f64 b (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 b b)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (*.f64 (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))))) (pow.f64 b #s(literal 6 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))))) (pow.f64 b #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) |
(+ (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) |
(fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (*.f64 (*.f64 a a) x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 a a) (*.f64 #s(literal 1/8 binary64) (fma.f64 x-scale (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 (*.f64 (*.f64 a a) x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/8 binary64) (*.f64 x-scale (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) (*.f64 (*.f64 a a) (*.f64 #s(literal 1/8 binary64) (fma.f64 x-scale (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 (*.f64 (*.f64 a a) x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (*.f64 (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))))))) |
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 a (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) |
(* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) |
(*.f64 a (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (*.f64 a a)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))))) |
(* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) |
(*.f64 a (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (*.f64 a a)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))))) (pow.f64 a #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))))) |
(* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))) |
(*.f64 a (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (*.f64 a a)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (*.f64 (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))))) (pow.f64 a #s(literal 6 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))))) (pow.f64 a #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))))))) |
(* -1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) |
(*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 a (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) |
(* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) |
(neg.f64 (*.f64 a (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (*.f64 a a)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))))) |
(* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))) |
(neg.f64 (*.f64 a (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (*.f64 a a)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))))) (pow.f64 a #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))))))) |
(* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))))) |
(neg.f64 (*.f64 a (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (*.f64 a a)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (*.f64 (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))))) (pow.f64 a #s(literal 6 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))))) (pow.f64 a #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))))))) |
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) |
(+ (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) |
(fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) |
(+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 #s(literal 1/8 binary64) (fma.f64 y-scale (*.f64 (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))))))) |
(+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 #s(literal 1/8 binary64) (fma.f64 y-scale (*.f64 (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) |
(*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) (pow.f64 x-scale #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) |
(*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) (pow.f64 x-scale #s(literal 6 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) (pow.f64 x-scale #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))))) |
(* -1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) |
(* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) |
(neg.f64 (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))) |
(* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) |
(neg.f64 (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) (pow.f64 x-scale #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))))) |
(* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))))) |
(neg.f64 (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) (pow.f64 x-scale #s(literal 6 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) (pow.f64 x-scale #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))))) |
(* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) |
(+ (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) |
(fma.f64 #s(literal 1/8 binary64) (*.f64 x-scale (*.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) |
(+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 (*.f64 y-scale y-scale) (*.f64 #s(literal 1/8 binary64) (fma.f64 x-scale (*.f64 (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 x-scale (*.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))))))) |
(+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 y-scale y-scale) (*.f64 #s(literal 1/8 binary64) (fma.f64 x-scale (*.f64 (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 x-scale (*.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) |
(* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) |
(*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) |
(* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) |
(*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) (pow.f64 y-scale #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))) |
(* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) |
(*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)))))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) (pow.f64 y-scale #s(literal 6 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) (pow.f64 y-scale #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))))) |
(* -1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) |
(* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) |
(neg.f64 (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))) |
(* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) |
(neg.f64 (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) (pow.f64 y-scale #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))))) |
(* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))))) |
(neg.f64 (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)))))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) (pow.f64 y-scale #s(literal 6 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) (pow.f64 y-scale #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))))) |
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) |
(+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))))))) (* b (sqrt 2)))) (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))) |
(fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 angle angle) (*.f64 x-scale x-scale)) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))))) (*.f64 b (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))) |
(+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))))) (* b (sqrt 2))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b y-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (*.f64 angle angle) (*.f64 #s(literal 1/8 binary64) (+.f64 (/.f64 (*.f64 (*.f64 (*.f64 angle angle) (*.f64 x-scale x-scale)) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal -1/787320000 binary64)) (pow.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))))) (*.f64 b (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))))) (*.f64 b (sqrt.f64 #s(literal 2 binary64)))))))) |
(+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))))) (* b (sqrt 2)))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))))) (* 1/2 (/ (* (pow x-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2)))))))) (* b (sqrt 2))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b y-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))))) (*.f64 b (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 angle angle) (*.f64 #s(literal 1/8 binary64) (+.f64 (/.f64 (*.f64 (*.f64 (*.f64 angle angle) (*.f64 x-scale x-scale)) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)))) (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))))) (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (fma.f64 #s(literal 1/102036672000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (+.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal -1/787320000 binary64)) (pow.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (+.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))))) (+.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal -1/787320000 binary64)) (pow.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))))) (*.f64 (*.f64 b b) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))))) (*.f64 b (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal -1/787320000 binary64)) (pow.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))))) (*.f64 b (sqrt.f64 #s(literal 2 binary64)))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) |
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) |
(+ (* 1/8 (/ (* (pow angle 2) (* y-scale (* (sqrt 2) (* (sqrt 8) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))))))) b)) (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))) |
(fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 angle angle) y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64)))))) b) (*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))) |
(+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* y-scale (* (sqrt 2) (* (sqrt 8) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))))) b)) (* 1/8 (/ (* (pow angle 2) (* y-scale (* (sqrt 2) (* (sqrt 8) (- (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (* 1/4 (/ (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2) (pow b 2)))))))) b))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b y-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (*.f64 angle angle) (*.f64 #s(literal 1/8 binary64) (+.f64 (/.f64 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64)))))) b) (/.f64 (*.f64 (*.f64 (*.f64 angle angle) y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64)))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))))) (*.f64 b b)))))) b))))) |
(+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* y-scale (* (sqrt 2) (* (sqrt 8) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))))) b)) (* (pow angle 2) (+ (* 1/8 (/ (* y-scale (* (sqrt 2) (* (sqrt 8) (- (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (* 1/4 (/ (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2) (pow b 2))))))) b)) (* 1/8 (/ (* (pow angle 2) (* y-scale (* (sqrt 2) (* (sqrt 8) (- (+ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6))))) (* 1/2 (/ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (- (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (* 1/4 (/ (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2) (pow b 2))))) (pow b 2)))))))) b))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b y-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64)))))) b) (*.f64 (*.f64 angle angle) (*.f64 #s(literal 1/8 binary64) (+.f64 (/.f64 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64)))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))))) (*.f64 b b)))))) b) (/.f64 (*.f64 (*.f64 (*.f64 angle angle) y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (fma.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64)))) (+.f64 (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64)))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))))) (*.f64 b b))))) (*.f64 b b)))))) b))))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) |
(* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(+ (* 1/8 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* a (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))) |
(fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 a (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))) |
(+ (* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (* (pow b 2) (+ (* -1/32 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow a 3) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* 1/8 (/ (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (* a (sin (* 1/180 (* angle (PI)))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 a (*.f64 a a)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 y-scale (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 a (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) |
(+ (* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (* (pow b 2) (+ (* 1/8 (/ (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (* a (sin (* 1/180 (* angle (PI))))))) (* (pow b 2) (+ (* -1/32 (/ (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8)))) (* (pow a 3) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* 1/64 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 6) (* (sqrt 2) (sqrt 8))))) (* (pow a 5) (pow (sin (* 1/180 (* angle (PI)))) 5))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 a (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 a (*.f64 a a)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (/.f64 (*.f64 #s(literal 1/64 binary64) (*.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 (pow.f64 a #s(literal 5 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64))))))))) |
(* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(* b (+ (* 1/8 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))) |
(*.f64 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 b b) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))) |
(* b (+ (* -1/32 (/ (* (pow a 4) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/8 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))) |
(*.f64 b (fma.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 b b) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))) |
(* b (+ (* -1/32 (/ (* (pow a 4) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/64 (/ (* (pow a 6) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 6) (* (sqrt 2) (sqrt 8))))) (* (pow b 6) (pow (cos (* 1/180 (* angle (PI)))) 5)))) (+ (* 1/8 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))) |
(*.f64 b (fma.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/64 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 6 binary64)) y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 b b) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))) |
(* -1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 b y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(* -1 (* b (+ (* 1/8 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))) |
(neg.f64 (*.f64 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 b b) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))) |
(* -1 (* b (+ (* -1/32 (/ (* (pow a 4) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/8 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))) |
(neg.f64 (*.f64 b (fma.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 b b) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))) |
(* -1 (* b (+ (* -1/32 (/ (* (pow a 4) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/64 (/ (* (pow a 6) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 6) (* (sqrt 2) (sqrt 8))))) (* (pow b 6) (pow (cos (* 1/180 (* angle (PI)))) 5)))) (+ (* 1/8 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))))) |
(neg.f64 (*.f64 b (fma.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/64 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 6 binary64)) y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 b b) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))))) |
(* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(+ (* 1/8 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* b (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))) |
(fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 b (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))) |
(+ (* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (* (pow a 2) (+ (* -1/32 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow b 3) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (* 1/8 (/ (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (* b (cos (* 1/180 (* angle (PI)))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 b (*.f64 b b)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 b (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) |
(+ (* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (* (pow a 2) (+ (* 1/8 (/ (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (* b (cos (* 1/180 (* angle (PI))))))) (* (pow a 2) (+ (* -1/32 (/ (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8)))) (* (pow b 3) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (* 1/64 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 6) (* (sqrt 2) (sqrt 8))))) (* (pow b 5) (pow (cos (* 1/180 (* angle (PI)))) 5))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 b (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 b (*.f64 b b)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (/.f64 (*.f64 #s(literal 1/64 binary64) (*.f64 (*.f64 (*.f64 a a) y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 (pow.f64 b #s(literal 5 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64))))))))) |
(* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(* a (+ (* 1/8 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))) |
(*.f64 a (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))) |
(* a (+ (* -1/32 (/ (* (pow b 4) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/8 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))) |
(*.f64 a (fma.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))) |
(* a (+ (* -1/32 (/ (* (pow b 4) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/64 (/ (* (pow b 6) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 6) (* (sqrt 2) (sqrt 8))))) (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 5)))) (+ (* 1/8 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))) |
(*.f64 a (fma.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/64 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 6 binary64)) y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))) |
(* -1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 a y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(* -1 (* a (+ (* 1/8 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))) |
(neg.f64 (*.f64 a (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))) |
(* -1 (* a (+ (* -1/32 (/ (* (pow b 4) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/8 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))) |
(neg.f64 (*.f64 a (fma.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))) |
(* -1 (* a (+ (* -1/32 (/ (* (pow b 4) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/64 (/ (* (pow b 6) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 6) (* (sqrt 2) (sqrt 8))))) (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 5)))) (+ (* 1/8 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))))) |
(neg.f64 (*.f64 a (fma.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/64 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 6 binary64)) y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))))) |
(* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) |
(+ (* -1/259200 (* (pow angle 2) (* b (* y-scale (* (pow (PI) 2) (* (sqrt 2) (sqrt 8))))))) (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))) |
(fma.f64 #s(literal -1/259200 binary64) (*.f64 (*.f64 (*.f64 angle angle) b) (*.f64 (*.f64 y-scale (*.f64 (PI.f64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))) |
(+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* -1/259200 (* b (* y-scale (* (pow (PI) 2) (* (sqrt 2) (sqrt 8)))))) (* 1/100776960000 (* (pow angle 2) (* b (* y-scale (* (pow (PI) 4) (* (sqrt 2) (sqrt 8)))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b y-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/259200 binary64) (*.f64 b (*.f64 (*.f64 y-scale (*.f64 (PI.f64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 #s(literal 1/100776960000 binary64) (*.f64 (*.f64 (*.f64 angle angle) b) (*.f64 (*.f64 y-scale (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))) |
(+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* -1/259200 (* b (* y-scale (* (pow (PI) 2) (* (sqrt 2) (sqrt 8)))))) (* (pow angle 2) (+ (* -1/97955205120000000 (* (pow angle 2) (* b (* y-scale (* (pow (PI) 6) (* (sqrt 2) (sqrt 8))))))) (* 1/100776960000 (* b (* y-scale (* (pow (PI) 4) (* (sqrt 2) (sqrt 8))))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b y-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/259200 binary64) (*.f64 b (*.f64 (*.f64 y-scale (*.f64 (PI.f64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/97955205120000000 binary64) (*.f64 (*.f64 (*.f64 angle angle) b) (*.f64 (*.f64 y-scale (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 #s(literal 1/100776960000 binary64) b) (*.f64 (*.f64 y-scale (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))))) |
(* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) |
(*.f64 (*.f64 b y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) |
(*.f64 (*.f64 b y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) |
(*.f64 (*.f64 b y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) |
(*.f64 (*.f64 b y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) |
(*.f64 (*.f64 b y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) |
(*.f64 (*.f64 b y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) |
(*.f64 (*.f64 b y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) |
(*.f64 (*.f64 b y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) |
(*.f64 (*.f64 b y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) |
(*.f64 (*.f64 b y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) |
(*.f64 (*.f64 b y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) |
(*.f64 (*.f64 b y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) |
(*.f64 (*.f64 b y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) |
(*.f64 (*.f64 b y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) |
(*.f64 (*.f64 b y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) |
(*.f64 (*.f64 b y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) |
(*.f64 (*.f64 b y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) |
(*.f64 (*.f64 b y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) |
(*.f64 (*.f64 b y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) |
(*.f64 (*.f64 b y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) |
(*.f64 (*.f64 b y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) |
(*.f64 (*.f64 b y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) |
(*.f64 (*.f64 b y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) |
(*.f64 (*.f64 b y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(* b (* y-scale (* (sqrt 2) (sqrt 8)))) |
(*.f64 (*.f64 b y-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) |
(+ (* -1/64800 (* (pow angle 2) (* b (* y-scale (* (pow (PI) 2) (* (sqrt 2) (sqrt 8))))))) (* b (* y-scale (* (sqrt 2) (sqrt 8))))) |
(fma.f64 #s(literal -1/64800 binary64) (*.f64 (*.f64 (*.f64 angle angle) b) (*.f64 (*.f64 y-scale (*.f64 (PI.f64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 b y-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(+ (* b (* y-scale (* (sqrt 2) (sqrt 8)))) (* (pow angle 2) (+ (* -1/64800 (* b (* y-scale (* (pow (PI) 2) (* (sqrt 2) (sqrt 8)))))) (* 1/25194240000 (* (pow angle 2) (* b (* y-scale (* (pow (PI) 4) (* (sqrt 2) (sqrt 8)))))))))) |
(fma.f64 b (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/64800 binary64) (*.f64 b (*.f64 (*.f64 y-scale (*.f64 (PI.f64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 #s(literal 1/25194240000 binary64) (*.f64 (*.f64 (*.f64 angle angle) b) (*.f64 (*.f64 y-scale (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))) |
(+ (* b (* y-scale (* (sqrt 2) (sqrt 8)))) (* (pow angle 2) (+ (* -1/64800 (* b (* y-scale (* (pow (PI) 2) (* (sqrt 2) (sqrt 8)))))) (* (pow angle 2) (+ (* -1/24488801280000000 (* (pow angle 2) (* b (* y-scale (* (pow (PI) 6) (* (sqrt 2) (sqrt 8))))))) (* 1/25194240000 (* b (* y-scale (* (pow (PI) 4) (* (sqrt 2) (sqrt 8))))))))))) |
(fma.f64 b (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/64800 binary64) (*.f64 b (*.f64 (*.f64 y-scale (*.f64 (PI.f64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/24488801280000000 binary64) (*.f64 (*.f64 (*.f64 angle angle) b) (*.f64 (*.f64 y-scale (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 #s(literal 1/25194240000 binary64) b) (*.f64 (*.f64 y-scale (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))))) |
(* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) |
(*.f64 (*.f64 b y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) |
(*.f64 (*.f64 b y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) |
(*.f64 (*.f64 b y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) |
(*.f64 (*.f64 b y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) |
(*.f64 (*.f64 b y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) |
(*.f64 (*.f64 b y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) |
(*.f64 (*.f64 b y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) |
(*.f64 (*.f64 b y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(/ 1/4 (* (pow a 2) (pow b 2))) |
(/.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a a) (*.f64 b b))) |
(/ 1/4 (* (pow a 2) (pow b 2))) |
(/.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a a) (*.f64 b b))) |
(/ 1/4 (* (pow a 2) (pow b 2))) |
(/.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a a) (*.f64 b b))) |
(/ 1/4 (* (pow a 2) (pow b 2))) |
(/.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a a) (*.f64 b b))) |
(/ 1/4 (* (pow a 2) (pow b 2))) |
(/.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a a) (*.f64 b b))) |
(/ 1/4 (* (pow a 2) (pow b 2))) |
(/.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a a) (*.f64 b b))) |
(/ 1/4 (* (pow a 2) (pow b 2))) |
(/.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a a) (*.f64 b b))) |
(/ 1/4 (* (pow a 2) (pow b 2))) |
(/.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a a) (*.f64 b b))) |
(/ 1/4 (* (pow a 2) (pow b 2))) |
(/.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a a) (*.f64 b b))) |
(/ 1/4 (* (pow a 2) (pow b 2))) |
(/.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a a) (*.f64 b b))) |
(/ 1/4 (* (pow a 2) (pow b 2))) |
(/.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a a) (*.f64 b b))) |
(/ 1/4 (* (pow a 2) (pow b 2))) |
(/.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a a) (*.f64 b b))) |
(/ 1/4 (* (pow a 2) (pow b 2))) |
(/.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a a) (*.f64 b b))) |
(/ 1/4 (* (pow a 2) (pow b 2))) |
(/.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a a) (*.f64 b b))) |
(/ 1/4 (* (pow a 2) (pow b 2))) |
(/.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a a) (*.f64 b b))) |
(/ 1/4 (* (pow a 2) (pow b 2))) |
(/.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a a) (*.f64 b b))) |
(/ 1/4 (* (pow a 2) (pow b 2))) |
(/.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a a) (*.f64 b b))) |
(/ 1/4 (* (pow a 2) (pow b 2))) |
(/.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a a) (*.f64 b b))) |
(/ 1/4 (* (pow a 2) (pow b 2))) |
(/.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a a) (*.f64 b b))) |
(/ 1/4 (* (pow a 2) (pow b 2))) |
(/.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a a) (*.f64 b b))) |
(/ 1/4 (* (pow a 2) (pow b 2))) |
(/.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a a) (*.f64 b b))) |
(/ 1/4 (* (pow a 2) (pow b 2))) |
(/.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a a) (*.f64 b b))) |
(/ 1/4 (* (pow a 2) (pow b 2))) |
(/.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a a) (*.f64 b b))) |
(/ 1/4 (* (pow a 2) (pow b 2))) |
(/.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a a) (*.f64 b b))) |
(* -4 (* (pow a 2) (pow b 2))) |
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 b b)) |
(* -4 (* (pow a 2) (pow b 2))) |
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 b b)) |
(* -4 (* (pow a 2) (pow b 2))) |
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 b b)) |
(* -4 (* (pow a 2) (pow b 2))) |
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 b b)) |
(* -4 (* (pow a 2) (pow b 2))) |
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 b b)) |
(* -4 (* (pow a 2) (pow b 2))) |
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 b b)) |
(* -4 (* (pow a 2) (pow b 2))) |
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 b b)) |
(* -4 (* (pow a 2) (pow b 2))) |
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 b b)) |
(* -4 (* (pow a 2) (pow b 2))) |
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 b b)) |
(* -4 (* (pow a 2) (pow b 2))) |
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 b b)) |
(* -4 (* (pow a 2) (pow b 2))) |
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 b b)) |
(* -4 (* (pow a 2) (pow b 2))) |
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 b b)) |
(* -4 (* (pow a 2) (pow b 2))) |
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 b b)) |
(* -4 (* (pow a 2) (pow b 2))) |
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 b b)) |
(* -4 (* (pow a 2) (pow b 2))) |
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 b b)) |
(* -4 (* (pow a 2) (pow b 2))) |
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 b b)) |
(* -4 (* (pow a 2) (pow b 2))) |
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 b b)) |
(* -4 (* (pow a 2) (pow b 2))) |
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 b b)) |
(* -4 (* (pow a 2) (pow b 2))) |
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 b b)) |
(* -4 (* (pow a 2) (pow b 2))) |
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 b b)) |
(* -4 (* (pow a 2) (pow b 2))) |
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 b b)) |
(* -4 (* (pow a 2) (pow b 2))) |
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 b b)) |
(* -4 (* (pow a 2) (pow b 2))) |
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 b b)) |
(* -4 (* (pow a 2) (pow b 2))) |
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 b b)) |
(/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) |
(/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) |
(+ (* (pow a 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) |
(fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) |
(+ (* (pow a 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) |
(fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) |
(+ (* (pow a 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) |
(fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) |
(* (pow a 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2))))) |
(*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)))) |
(* (pow a 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) (pow x-scale 2)))))) |
(*.f64 (*.f64 a a) (+.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 a a) (*.f64 x-scale x-scale))))) |
(* (pow a 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) (pow x-scale 2)))))) |
(*.f64 (*.f64 a a) (+.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 a a) (*.f64 x-scale x-scale))))) |
(* (pow a 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) (pow x-scale 2)))))) |
(*.f64 (*.f64 a a) (+.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 a a) (*.f64 x-scale x-scale))))) |
(* (pow a 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2))))) |
(*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)))) |
(* (pow a 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) (pow x-scale 2)))))) |
(*.f64 (*.f64 a a) (+.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 a a) (*.f64 x-scale x-scale))))) |
(* (pow a 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) (pow x-scale 2)))))) |
(*.f64 (*.f64 a a) (+.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 a a) (*.f64 x-scale x-scale))))) |
(* (pow a 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) (pow x-scale 2)))))) |
(*.f64 (*.f64 a a) (+.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 a a) (*.f64 x-scale x-scale))))) |
(/ (pow b 2) (pow x-scale 2)) |
(/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) |
(+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))))) (/ (pow b 2) (pow x-scale 2))) |
(fma.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))) |
(+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))))))) (/ (pow b 2) (pow x-scale 2))) |
(fma.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale))))))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))) |
(+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2))) (* (pow angle 2) (+ (* -1/765275040000000 (/ (* (pow b 2) (pow (PI) 6)) (pow x-scale 2))) (* 1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow x-scale 2))))))))))) (/ (pow b 2) (pow x-scale 2))) |
(fma.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/765275040000000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal 1/765275040000000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (*.f64 x-scale x-scale))))))))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))) |
(+ (/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) |
(+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) |
(+ (/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) |
(+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) |
(+ (/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) |
(+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) |
(+ (/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) |
(+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) |
(+ (/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) |
(+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) |
(+ (/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) |
(+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) |
(+ (/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) |
(+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) |
(+ (/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) |
(+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) |
(/ (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow x-scale 2)) |
(/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 x-scale x-scale)) |
(/ (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow x-scale 2)) |
(/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 x-scale x-scale)) |
(/ (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow x-scale 2)) |
(/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 x-scale x-scale)) |
(/ (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow x-scale 2)) |
(/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 x-scale x-scale)) |
(/ (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow x-scale 2)) |
(/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 x-scale x-scale)) |
(/ (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow x-scale 2)) |
(/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 x-scale x-scale)) |
(/ (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow x-scale 2)) |
(/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 x-scale x-scale)) |
(/ (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow x-scale 2)) |
(/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 x-scale x-scale)) |
(/ (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow x-scale 2)) |
(/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 x-scale x-scale)) |
(/ (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow x-scale 2)) |
(/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 x-scale x-scale)) |
(/ (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow x-scale 2)) |
(/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 x-scale x-scale)) |
(/ (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow x-scale 2)) |
(/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 x-scale x-scale)) |
(/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) |
(/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) |
(+ (* (pow b 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) |
(fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) |
(+ (* (pow b 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) |
(fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) |
(+ (* (pow b 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) |
(fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) |
(* (pow b 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2))))) |
(*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)))) |
(* (pow b 2) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (pow x-scale 2)))))) |
(*.f64 (*.f64 b b) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) |
(* (pow b 2) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (pow x-scale 2)))))) |
(*.f64 (*.f64 b b) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) |
(* (pow b 2) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (pow x-scale 2)))))) |
(*.f64 (*.f64 b b) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) |
(* (pow b 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2))))) |
(*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)))) |
(* (pow b 2) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (pow x-scale 2)))))) |
(*.f64 (*.f64 b b) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) |
(* (pow b 2) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (pow x-scale 2)))))) |
(*.f64 (*.f64 b b) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) |
(* (pow b 2) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (pow x-scale 2)))))) |
(*.f64 (*.f64 b b) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) |
(* 1/32400 (* (pow angle 2) (pow (PI) 2))) |
(*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 angle angle)) (*.f64 (PI.f64) (PI.f64))) |
(* (pow angle 2) (+ (* -1/3149280000 (* (pow angle 2) (pow (PI) 4))) (* 1/32400 (pow (PI) 2)))) |
(*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 angle angle) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64))))) |
(* (pow angle 2) (+ (* 1/32400 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/3149280000 (pow (PI) 4)) (* 1/765275040000000 (* (pow angle 2) (pow (PI) 6))))))) |
(*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 #s(literal 1/765275040000000 binary64) (*.f64 angle angle)) (pow.f64 (PI.f64) #s(literal 6 binary64))))))) |
(* (pow angle 2) (+ (* 1/32400 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/3149280000 (pow (PI) 4)) (* (pow angle 2) (+ (* -1/347128758144000000000 (* (pow angle 2) (pow (PI) 8))) (* 1/765275040000000 (pow (PI) 6)))))))) |
(*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 angle angle) (fma.f64 (*.f64 #s(literal -1/347128758144000000000 binary64) (*.f64 angle angle)) (pow.f64 (PI.f64) #s(literal 8 binary64)) (*.f64 #s(literal 1/765275040000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))))))) |
(+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) |
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) |
(+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) |
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) |
(+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) |
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) |
(+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) |
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) |
(+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) |
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) |
(+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) |
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) |
(+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) |
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) |
(+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) |
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) |
(* 2 (pow (cos (* 1/180 (* angle (PI)))) 2)) |
(*.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) |
(* 2 (pow (cos (* 1/180 (* angle (PI)))) 2)) |
(*.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) |
(* 2 (pow (cos (* 1/180 (* angle (PI)))) 2)) |
(*.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) |
(* 2 (pow (cos (* 1/180 (* angle (PI)))) 2)) |
(*.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) |
(* 2 (pow (cos (* 1/180 (* angle (PI)))) 2)) |
(*.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) |
(* 2 (pow (cos (* 1/180 (* angle (PI)))) 2)) |
(*.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) |
(* 2 (pow (cos (* 1/180 (* angle (PI)))) 2)) |
(*.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) |
(* 2 (pow (cos (* 1/180 (* angle (PI)))) 2)) |
(*.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) |
(* 2 (pow (cos (* 1/180 (* angle (PI)))) 2)) |
(*.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) |
(* 2 (pow (cos (* 1/180 (* angle (PI)))) 2)) |
(*.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) |
(* 2 (pow (cos (* 1/180 (* angle (PI)))) 2)) |
(*.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) |
(* 2 (pow (cos (* 1/180 (* angle (PI)))) 2)) |
(*.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) |
2 |
#s(literal 2 binary64) |
(+ 2 (* -1/16200 (* (pow angle 2) (pow (PI) 2)))) |
(+.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal -1/16200 binary64) (*.f64 angle angle)) (*.f64 (PI.f64) (PI.f64)))) |
(+ 2 (* (pow angle 2) (+ (* -1/16200 (pow (PI) 2)) (* 2 (* (pow angle 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))))) |
(+.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/16200 binary64) (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle angle)) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)))))) |
(+ 2 (* (pow angle 2) (+ (* -1/16200 (pow (PI) 2)) (* (pow angle 2) (+ (* 2 (* (pow angle 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6))))) (* 2 (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))) |
(+.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/16200 binary64) (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 angle angle) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 angle angle) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)))))))) |
(* 2 (pow (cos (* 1/180 (* angle (PI)))) 2)) |
(*.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) |
(* 2 (pow (cos (* 1/180 (* angle (PI)))) 2)) |
(*.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) |
(* 2 (pow (cos (* 1/180 (* angle (PI)))) 2)) |
(*.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) |
(* 2 (pow (cos (* 1/180 (* angle (PI)))) 2)) |
(*.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) |
(* 2 (pow (cos (* 1/180 (* angle (PI)))) 2)) |
(*.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) |
(* 2 (pow (cos (* 1/180 (* angle (PI)))) 2)) |
(*.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) |
(* 2 (pow (cos (* 1/180 (* angle (PI)))) 2)) |
(*.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) |
(* 2 (pow (cos (* 1/180 (* angle (PI)))) 2)) |
(*.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) |
(* -1 (* b (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))))) |
(neg.f64 (*.f64 b (*.f64 #s(literal 1/4 binary64) (fma.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) |
(* -1 (* b (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))))) |
(neg.f64 (*.f64 b (*.f64 #s(literal 1/4 binary64) (fma.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) |
(* -1 (* b (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))))) |
(neg.f64 (*.f64 b (*.f64 #s(literal 1/4 binary64) (fma.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) |
(* -1 (* b (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))))) |
(neg.f64 (*.f64 b (*.f64 #s(literal 1/4 binary64) (fma.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) |
(* -1 (* b (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))))) |
(neg.f64 (*.f64 b (*.f64 #s(literal 1/4 binary64) (fma.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) |
(* -1 (* b (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))))) |
(neg.f64 (*.f64 b (*.f64 #s(literal 1/4 binary64) (fma.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) |
(* -1 (* b (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))))) |
(neg.f64 (*.f64 b (*.f64 #s(literal 1/4 binary64) (fma.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) |
(* -1 (* b (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))))) |
(neg.f64 (*.f64 b (*.f64 #s(literal 1/4 binary64) (fma.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) |
(* -1 (* b (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))))) |
(neg.f64 (*.f64 b (*.f64 #s(literal 1/4 binary64) (fma.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) |
(* -1 (* b (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))))) |
(neg.f64 (*.f64 b (*.f64 #s(literal 1/4 binary64) (fma.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) |
(* -1 (* b (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))))) |
(neg.f64 (*.f64 b (*.f64 #s(literal 1/4 binary64) (fma.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) |
(* -1 (* b (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))))) |
(neg.f64 (*.f64 b (*.f64 #s(literal 1/4 binary64) (fma.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) |
(* -1/4 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) |
(*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 b (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(- (* -1/4 (/ (* b (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 b (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 b (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(- (* -1/4 (/ (* b (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 b (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 b (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(- (* -1/4 (/ (* b (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 b (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 b (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(* -1/4 (/ (* b (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) |
(/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 b (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) |
(* (pow y-scale 2) (- (* -1/4 (/ (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (pow y-scale 2))) (* 1/4 (/ (* b (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))))) |
(*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 b (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 b (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) |
(* (pow y-scale 2) (- (* -1/4 (/ (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (pow y-scale 2))) (* 1/4 (/ (* b (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))))) |
(*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 b (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 b (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) |
(* (pow y-scale 2) (- (* -1/4 (/ (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (pow y-scale 2))) (* 1/4 (/ (* b (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))))) |
(*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 b (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 b (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) |
(* -1/4 (/ (* b (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) |
(/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 b (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) |
(* (pow y-scale 2) (- (* -1/4 (/ (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (pow y-scale 2))) (* 1/4 (/ (* b (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))))) |
(*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 b (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 b (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) |
(* (pow y-scale 2) (- (* -1/4 (/ (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (pow y-scale 2))) (* 1/4 (/ (* b (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))))) |
(*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 b (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 b (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) |
(* (pow y-scale 2) (- (* -1/4 (/ (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (pow y-scale 2))) (* 1/4 (/ (* b (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))))) |
(*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 b (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 b (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) |
(* -45 (/ (* b (* (pow y-scale 2) (* (sqrt 1/2) (sqrt 8)))) (* angle (* (pow x-scale 2) (PI))))) |
(/.f64 (*.f64 #s(literal -45 binary64) (*.f64 (*.f64 b (*.f64 y-scale y-scale)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 angle (*.f64 (*.f64 x-scale x-scale) (PI.f64)))) |
(/ (- (* -1 (* (pow angle 2) (* b (+ (* 1/720 (* (PI) (* (sqrt 2) (sqrt 8)))) (* 1/4 (- (* -1/180 (/ (* (pow y-scale 2) (* (PI) (* (sqrt 1/2) (sqrt 8)))) (pow x-scale 2))) (* -1/1080 (/ (* (pow y-scale 2) (* (PI) (* (sqrt 1/2) (sqrt 8)))) (pow x-scale 2))))))))) (* 45 (/ (* b (* (pow y-scale 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow x-scale 2) (PI))))) angle) |
(/.f64 (+.f64 (neg.f64 (*.f64 (*.f64 (*.f64 angle angle) b) (fma.f64 #s(literal 1/720 binary64) (*.f64 (*.f64 (PI.f64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (PI.f64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 x-scale x-scale)) #s(literal -1/216 binary64)))))) (*.f64 #s(literal -45 binary64) (/.f64 (*.f64 (*.f64 b (*.f64 y-scale y-scale)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (*.f64 x-scale x-scale) (PI.f64))))) angle) |
(/ (- (* (pow angle 2) (- (* -1 (* (pow angle 2) (* b (+ (* -1/139968000 (* (pow (PI) 3) (* (sqrt 2) (sqrt 8)))) (* 1/4 (- (* 180 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (PI)))) (+ (* -1/194400 (* (pow (PI) 2) (- (* -1/180 (/ (* (pow y-scale 2) (* (PI) (* (sqrt 1/2) (sqrt 8)))) (pow x-scale 2))) (* -1/1080 (/ (* (pow y-scale 2) (* (PI) (* (sqrt 1/2) (sqrt 8)))) (pow x-scale 2)))))) (* 1/699840000 (/ (* (pow y-scale 2) (* (pow (PI) 3) (* (sqrt 1/2) (sqrt 8)))) (pow x-scale 2)))))))))) (* b (+ (* 1/720 (* (PI) (* (sqrt 2) (sqrt 8)))) (* 1/4 (- (* -1/180 (/ (* (pow y-scale 2) (* (PI) (* (sqrt 1/2) (sqrt 8)))) (pow x-scale 2))) (* -1/1080 (/ (* (pow y-scale 2) (* (PI) (* (sqrt 1/2) (sqrt 8)))) (pow x-scale 2))))))))) (* 45 (/ (* b (* (pow y-scale 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow x-scale 2) (PI))))) angle) |
(/.f64 (fma.f64 (*.f64 angle angle) (-.f64 (neg.f64 (*.f64 (*.f64 (*.f64 angle angle) b) (fma.f64 #s(literal -1/139968000 binary64) (*.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 #s(literal 1/4 binary64) (-.f64 (/.f64 (*.f64 #s(literal 180 binary64) (*.f64 (*.f64 (*.f64 y-scale y-scale) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))))) (*.f64 (*.f64 x-scale x-scale) (PI.f64))) (fma.f64 #s(literal -1/194400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (PI.f64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 x-scale x-scale)) #s(literal -1/216 binary64))) (/.f64 (*.f64 #s(literal 1/699840000 binary64) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 x-scale x-scale)))))))) (*.f64 b (fma.f64 #s(literal 1/720 binary64) (*.f64 (*.f64 (PI.f64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (PI.f64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 x-scale x-scale)) #s(literal -1/216 binary64)))))) (*.f64 #s(literal -45 binary64) (/.f64 (*.f64 (*.f64 b (*.f64 y-scale y-scale)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (*.f64 x-scale x-scale) (PI.f64))))) angle) |
(/ (- (* (pow angle 2) (- (* (pow angle 2) (- (* -1 (* (pow angle 2) (* b (+ (* 1/90699264000000 (* (pow (PI) 5) (* (sqrt 2) (sqrt 8)))) (* 1/4 (- (* 180 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))))) (* (pow x-scale 2) (PI)))) (+ (* -1/194400 (* (pow (PI) 2) (- (* 180 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (PI)))) (+ (* -1/194400 (* (pow (PI) 2) (- (* -1/180 (/ (* (pow y-scale 2) (* (PI) (* (sqrt 1/2) (sqrt 8)))) (pow x-scale 2))) (* -1/1080 (/ (* (pow y-scale 2) (* (PI) (* (sqrt 1/2) (sqrt 8)))) (pow x-scale 2)))))) (* 1/699840000 (/ (* (pow y-scale 2) (* (pow (PI) 3) (* (sqrt 1/2) (sqrt 8)))) (pow x-scale 2))))))) (+ (* -1/952342272000000 (/ (* (pow y-scale 2) (* (pow (PI) 5) (* (sqrt 1/2) (sqrt 8)))) (pow x-scale 2))) (* 1/125971200000 (* (pow (PI) 4) (- (* -1/180 (/ (* (pow y-scale 2) (* (PI) (* (sqrt 1/2) (sqrt 8)))) (pow x-scale 2))) (* -1/1080 (/ (* (pow y-scale 2) (* (PI) (* (sqrt 1/2) (sqrt 8)))) (pow x-scale 2)))))))))))))) (* b (+ (* -1/139968000 (* (pow (PI) 3) (* (sqrt 2) (sqrt 8)))) (* 1/4 (- (* 180 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (PI)))) (+ (* -1/194400 (* (pow (PI) 2) (- (* -1/180 (/ (* (pow y-scale 2) (* (PI) (* (sqrt 1/2) (sqrt 8)))) (pow x-scale 2))) (* -1/1080 (/ (* (pow y-scale 2) (* (PI) (* (sqrt 1/2) (sqrt 8)))) (pow x-scale 2)))))) (* 1/699840000 (/ (* (pow y-scale 2) (* (pow (PI) 3) (* (sqrt 1/2) (sqrt 8)))) (pow x-scale 2)))))))))) (* b (+ (* 1/720 (* (PI) (* (sqrt 2) (sqrt 8)))) (* 1/4 (- (* -1/180 (/ (* (pow y-scale 2) (* (PI) (* (sqrt 1/2) (sqrt 8)))) (pow x-scale 2))) (* -1/1080 (/ (* (pow y-scale 2) (* (PI) (* (sqrt 1/2) (sqrt 8)))) (pow x-scale 2))))))))) (* 45 (/ (* b (* (pow y-scale 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow x-scale 2) (PI))))) angle) |
(/.f64 (fma.f64 (*.f64 angle angle) (fma.f64 (*.f64 angle angle) (-.f64 (neg.f64 (*.f64 (*.f64 (*.f64 angle angle) b) (fma.f64 #s(literal 1/90699264000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 #s(literal 1/4 binary64) (-.f64 (/.f64 (*.f64 #s(literal 180 binary64) (*.f64 (*.f64 (*.f64 y-scale y-scale) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))))) (*.f64 (*.f64 x-scale x-scale) (PI.f64))) (fma.f64 (*.f64 #s(literal -1/194400 binary64) (*.f64 (PI.f64) (PI.f64))) (-.f64 (/.f64 (*.f64 #s(literal 180 binary64) (*.f64 (*.f64 (*.f64 y-scale y-scale) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))))) (*.f64 (*.f64 x-scale x-scale) (PI.f64))) (fma.f64 #s(literal -1/194400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (PI.f64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 x-scale x-scale)) #s(literal -1/216 binary64))) (/.f64 (*.f64 #s(literal 1/699840000 binary64) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/952342272000000 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 #s(literal 1/125971200000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (PI.f64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 x-scale x-scale)) #s(literal -1/216 binary64)))))))))) (*.f64 b (fma.f64 #s(literal -1/139968000 binary64) (*.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 #s(literal 1/4 binary64) (-.f64 (/.f64 (*.f64 #s(literal 180 binary64) (*.f64 (*.f64 (*.f64 y-scale y-scale) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))))) (*.f64 (*.f64 x-scale x-scale) (PI.f64))) (fma.f64 #s(literal -1/194400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (PI.f64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 x-scale x-scale)) #s(literal -1/216 binary64))) (/.f64 (*.f64 #s(literal 1/699840000 binary64) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 x-scale x-scale)))))))) (neg.f64 (*.f64 b (fma.f64 #s(literal 1/720 binary64) (*.f64 (*.f64 (PI.f64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (PI.f64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 x-scale x-scale)) #s(literal -1/216 binary64))))))) (*.f64 #s(literal -45 binary64) (/.f64 (*.f64 (*.f64 b (*.f64 y-scale y-scale)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (*.f64 x-scale x-scale) (PI.f64))))) angle) |
(* -1 (* b (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))))) |
(neg.f64 (*.f64 b (*.f64 #s(literal 1/4 binary64) (fma.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) |
(* -1 (* b (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))))) |
(neg.f64 (*.f64 b (*.f64 #s(literal 1/4 binary64) (fma.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) |
(* -1 (* b (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))))) |
(neg.f64 (*.f64 b (*.f64 #s(literal 1/4 binary64) (fma.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) |
(* -1 (* b (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))))) |
(neg.f64 (*.f64 b (*.f64 #s(literal 1/4 binary64) (fma.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) |
(* -1 (* b (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))))) |
(neg.f64 (*.f64 b (*.f64 #s(literal 1/4 binary64) (fma.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) |
(* -1 (* b (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))))) |
(neg.f64 (*.f64 b (*.f64 #s(literal 1/4 binary64) (fma.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) |
(* -1 (* b (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))))) |
(neg.f64 (*.f64 b (*.f64 #s(literal 1/4 binary64) (fma.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) |
(* -1 (* b (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))))) |
(neg.f64 (*.f64 b (*.f64 #s(literal 1/4 binary64) (fma.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) |
(* -1/4 (/ (* b (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) |
(/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 b (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) |
(/ (- (* -1/4 (* b (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (* 1/4 (/ (* b (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (sin (* 1/180 (* angle (PI))))))) (pow x-scale 2)) |
(/.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 b (*.f64 (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 b (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) |
(/ (- (* -1/4 (* b (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (* 1/4 (/ (* b (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (sin (* 1/180 (* angle (PI))))))) (pow x-scale 2)) |
(/.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 b (*.f64 (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 b (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) |
(/ (- (* -1/4 (* b (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (* 1/4 (/ (* b (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (sin (* 1/180 (* angle (PI))))))) (pow x-scale 2)) |
(/.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 b (*.f64 (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 b (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) |
(* -1/4 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) |
(*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 b (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(- (* -1/4 (/ (* b (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 b (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 b (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(- (* -1/4 (/ (* b (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 b (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 b (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(- (* -1/4 (/ (* b (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 b (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 b (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(* -1/4 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) |
(*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 b (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(- (* -1/4 (/ (* b (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 b (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 b (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(- (* -1/4 (/ (* b (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 b (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 b (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(- (* -1/4 (/ (* b (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 b (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 b (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) |
(+ (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) |
(fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (*.f64 (*.f64 b b) x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 b b) (*.f64 #s(literal 1/8 binary64) (fma.f64 x-scale (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 (*.f64 (*.f64 b b) x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/8 binary64) (*.f64 x-scale (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) (*.f64 (*.f64 b b) (*.f64 #s(literal 1/8 binary64) (fma.f64 x-scale (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 (*.f64 (*.f64 b b) x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (*.f64 (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))))))) |
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) |
(* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))) |
(*.f64 b (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 b b)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))))) |
(* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) |
(*.f64 b (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 b b)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))))) (pow.f64 b #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))))) |
(* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))))) |
(*.f64 b (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 b b)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (*.f64 (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))))) (pow.f64 b #s(literal 6 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))))) (pow.f64 b #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))))))) |
(* -1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) |
(*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 b (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) |
(* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) |
(neg.f64 (*.f64 b (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 b b)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))))) |
(* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))))) |
(neg.f64 (*.f64 b (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 b b)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))))) (pow.f64 b #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))))))) |
(* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))))) |
(neg.f64 (*.f64 b (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 b b)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (*.f64 (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))))) (pow.f64 b #s(literal 6 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))))) (pow.f64 b #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) |
(+ (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) |
(fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (*.f64 (*.f64 a a) x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 a a) (*.f64 #s(literal 1/8 binary64) (fma.f64 x-scale (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 (*.f64 (*.f64 a a) x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/8 binary64) (*.f64 x-scale (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) (*.f64 (*.f64 a a) (*.f64 #s(literal 1/8 binary64) (fma.f64 x-scale (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 (*.f64 (*.f64 a a) x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (*.f64 (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))))))) |
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 a (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) |
(* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) |
(*.f64 a (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (*.f64 a a)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))))) |
(* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) |
(*.f64 a (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (*.f64 a a)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))))) (pow.f64 a #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))))) |
(* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))) |
(*.f64 a (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (*.f64 a a)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (*.f64 (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))))) (pow.f64 a #s(literal 6 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))))) (pow.f64 a #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))))))) |
(* -1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) |
(*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 a (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) |
(* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) |
(neg.f64 (*.f64 a (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (*.f64 a a)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))))) |
(* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))) |
(neg.f64 (*.f64 a (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (*.f64 a a)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))))) (pow.f64 a #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))))))) |
(* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))))) |
(neg.f64 (*.f64 a (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (*.f64 a a)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (*.f64 (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))))) (pow.f64 a #s(literal 6 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))))) (pow.f64 a #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))))))) |
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) |
(+ (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) |
(fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) |
(+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 #s(literal 1/8 binary64) (fma.f64 y-scale (*.f64 (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))))))) |
(+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 #s(literal 1/8 binary64) (fma.f64 y-scale (*.f64 (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) |
(*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) (pow.f64 x-scale #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) |
(*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) (pow.f64 x-scale #s(literal 6 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) (pow.f64 x-scale #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))))) |
(* -1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) |
(* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) |
(neg.f64 (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))) |
(* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) |
(neg.f64 (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) (pow.f64 x-scale #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))))) |
(* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))))) |
(neg.f64 (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) (pow.f64 x-scale #s(literal 6 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) (pow.f64 x-scale #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))))) |
(* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) |
(+ (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) |
(fma.f64 #s(literal 1/8 binary64) (*.f64 x-scale (*.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) |
(+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 (*.f64 y-scale y-scale) (*.f64 #s(literal 1/8 binary64) (fma.f64 x-scale (*.f64 (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 x-scale (*.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))))))) |
(+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 y-scale y-scale) (*.f64 #s(literal 1/8 binary64) (fma.f64 x-scale (*.f64 (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 x-scale (*.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) |
(* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) |
(*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) |
(* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) |
(*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) (pow.f64 y-scale #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))) |
(* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) |
(*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)))))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) (pow.f64 y-scale #s(literal 6 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) (pow.f64 y-scale #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))))) |
(* -1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) |
(* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) |
(neg.f64 (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))) |
(* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) |
(neg.f64 (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) (pow.f64 y-scale #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))))) |
(* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))))) |
(neg.f64 (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)))))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) (pow.f64 y-scale #s(literal 6 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) (pow.f64 y-scale #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))))) |
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) |
(+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))))))) (* b (sqrt 2)))) (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))) |
(fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 angle angle) (*.f64 x-scale x-scale)) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))))) (*.f64 b (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))) |
(+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))))) (* b (sqrt 2))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b y-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (*.f64 angle angle) (*.f64 #s(literal 1/8 binary64) (+.f64 (/.f64 (*.f64 (*.f64 (*.f64 angle angle) (*.f64 x-scale x-scale)) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal -1/787320000 binary64)) (pow.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))))) (*.f64 b (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))))) (*.f64 b (sqrt.f64 #s(literal 2 binary64)))))))) |
(+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))))) (* b (sqrt 2)))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))))) (* 1/2 (/ (* (pow x-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2)))))))) (* b (sqrt 2))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b y-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))))) (*.f64 b (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 angle angle) (*.f64 #s(literal 1/8 binary64) (+.f64 (/.f64 (*.f64 (*.f64 (*.f64 angle angle) (*.f64 x-scale x-scale)) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)))) (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))))) (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (fma.f64 #s(literal 1/102036672000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (+.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal -1/787320000 binary64)) (pow.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (+.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))))) (+.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal -1/787320000 binary64)) (pow.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))))) (*.f64 (*.f64 b b) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))))) (*.f64 b (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal -1/787320000 binary64)) (pow.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))))) (*.f64 b (sqrt.f64 #s(literal 2 binary64)))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) |
(* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) x-scale) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) x-scale) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) |
(/ (+ (* 1/8 (* (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* (pow x-scale 2) (* y-scale (* (sqrt 2) (sqrt 8)))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) x-scale) |
(/.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 y-scale (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) x-scale) |
(/ (+ (* 1/8 (* (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* (pow x-scale 2) (* y-scale (* (sqrt 2) (sqrt 8)))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) x-scale) |
(/.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 y-scale (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) x-scale) |
(/ (+ (* 1/8 (* (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* (pow x-scale 2) (* y-scale (* (sqrt 2) (sqrt 8)))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) x-scale) |
(/.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 y-scale (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) x-scale) |
(* 1/4 (* (* x-scale (* y-scale (* (sqrt 2) (sqrt 8)))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) |
(*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) |
(*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) |
(*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) |
(* 1/4 (* (* x-scale (* y-scale (* (sqrt 2) (sqrt 8)))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) |
(* -1 (* x-scale (+ (* -1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* -1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) |
(neg.f64 (*.f64 x-scale (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))))) |
(* -1 (* x-scale (+ (* -1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* -1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) |
(neg.f64 (*.f64 x-scale (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))))) |
(* -1 (* x-scale (+ (* -1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* -1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) |
(neg.f64 (*.f64 x-scale (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))))) |
(* 1/4 (* (* x-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) |
(+ (* 1/8 (* (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) x-scale) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* 1/4 (* (* x-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) |
(fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) x-scale) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) |
(+ (* 1/8 (* (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) x-scale) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* 1/4 (* (* x-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) |
(fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) x-scale) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) |
(+ (* 1/8 (* (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) x-scale) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* 1/4 (* (* x-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) |
(fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) x-scale) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) |
(* 1/8 (* (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) x-scale) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) |
(*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) x-scale) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) |
(* (pow y-scale 2) (+ (* 1/8 (* (/ (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) x-scale) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* 1/4 (* (/ (* x-scale (* (sqrt 2) (sqrt 8))) (pow y-scale 2)) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) |
(*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) x-scale) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) |
(* (pow y-scale 2) (+ (* 1/8 (* (/ (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) x-scale) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* 1/4 (* (/ (* x-scale (* (sqrt 2) (sqrt 8))) (pow y-scale 2)) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) |
(*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) x-scale) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) |
(* (pow y-scale 2) (+ (* 1/8 (* (/ (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) x-scale) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* 1/4 (* (/ (* x-scale (* (sqrt 2) (sqrt 8))) (pow y-scale 2)) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) |
(*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) x-scale) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) |
(* -1/8 (* (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) x-scale) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) |
(*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) x-scale) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) |
(* (pow y-scale 2) (+ (* -1/4 (* (/ (* x-scale (* (sqrt 2) (sqrt 8))) (pow y-scale 2)) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* -1/8 (* (/ (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) x-scale) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) |
(*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) x-scale) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))))) |
(* (pow y-scale 2) (+ (* -1/4 (* (/ (* x-scale (* (sqrt 2) (sqrt 8))) (pow y-scale 2)) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* -1/8 (* (/ (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) x-scale) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) |
(*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) x-scale) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))))) |
(* (pow y-scale 2) (+ (* -1/4 (* (/ (* x-scale (* (sqrt 2) (sqrt 8))) (pow y-scale 2)) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* -1/8 (* (/ (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) x-scale) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) |
(*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) x-scale) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))))) |
(* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (* 1/4 (* a (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))) |
(*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 a (*.f64 x-scale x-scale)) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))) |
(+ (* 1/4 (/ (* b (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))))))) (* (pow a 3) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (* 1/4 (* a (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))) |
(fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 b (*.f64 (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64)))))) (*.f64 (*.f64 (*.f64 a (*.f64 a a)) x-scale) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 a (*.f64 x-scale x-scale)) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))) |
(+ (* b (+ (* 1/4 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))))) (* (pow a 3) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (* b (* x-scale (+ (* 1/8 (+ (* -1/2 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow a 3) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 3))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))))) (* 1/8 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))) (* a (cos (* 1/180 (* angle (PI)))))))))))) (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (* 1/4 (* a (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))) |
(fma.f64 b (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64))))) (*.f64 (*.f64 (*.f64 a (*.f64 a a)) x-scale) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 b (*.f64 x-scale (*.f64 #s(literal 1/8 binary64) (+.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 x-scale x-scale)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (*.f64 a (*.f64 x-scale x-scale)) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 a (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 a (*.f64 x-scale x-scale)) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))) |
(+ (* b (+ (* 1/4 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))))) (* (pow a 3) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (* b (+ (* 1/8 (* b (* x-scale (+ (* -1 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))))) (* (pow a 5) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 3))))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (pow a 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))))))) (* x-scale (+ (* 1/8 (+ (* -1/2 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow a 3) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 3))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))))) (* 1/8 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))) (* a (cos (* 1/180 (* angle (PI))))))))))))) (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (* 1/4 (* a (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))) |
(fma.f64 b (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64))))) (*.f64 (*.f64 (*.f64 a (*.f64 a a)) x-scale) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 b (fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 b x-scale) (+.f64 (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64))))) (*.f64 (*.f64 (pow.f64 a #s(literal 5 binary64)) (*.f64 x-scale x-scale)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a #s(literal 0 binary64))) (*.f64 a a)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (*.f64 (*.f64 a (*.f64 x-scale x-scale)) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 x-scale (*.f64 #s(literal 1/8 binary64) (+.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 x-scale x-scale)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (*.f64 a (*.f64 x-scale x-scale)) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 a (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 a (*.f64 x-scale x-scale)) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))) |
(* b (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))) |
(*.f64 (*.f64 b x-scale) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))) |
(* b (+ (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))))) (* b (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))) |
(*.f64 b (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 a #s(literal 0 binary64))))) (*.f64 (*.f64 b x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))) |
(* b (+ (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))))) (* b (* x-scale (sin (* 1/180 (* angle (PI)))))))) (+ (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (/ (* x-scale (+ (* 1/8 (+ (* -1/2 (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))) |
(*.f64 b (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 a #s(literal 0 binary64))))) (*.f64 (*.f64 b x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (fma.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (/.f64 (*.f64 x-scale (*.f64 #s(literal 1/8 binary64) (+.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64))))) (*.f64 y-scale y-scale)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 b b))))) |
(* b (+ (* 1/8 (/ (* x-scale (+ (* -1 (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 a) (* 2 a))))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* 4 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (+ (* -2 a) (* 2 a)))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))))) (pow b 3))) (+ (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))))) (* b (* x-scale (sin (* 1/180 (* angle (PI)))))))) (+ (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (/ (* x-scale (+ (* 1/8 (+ (* -1/2 (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2)))))) |
(*.f64 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (+.f64 (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 a #s(literal 0 binary64))))) (*.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 a #s(literal 0 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 b (*.f64 b b))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 a #s(literal 0 binary64))))) (*.f64 (*.f64 b x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (fma.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (/.f64 (*.f64 x-scale (*.f64 #s(literal 1/8 binary64) (+.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64))))) (*.f64 y-scale y-scale)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 b b)))))) |
(* -1 (* b (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))) |
(neg.f64 (*.f64 (*.f64 b x-scale) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))) |
(* -1 (* b (+ (* -1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))))) (* b (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))) |
(neg.f64 (*.f64 b (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 a #s(literal 0 binary64))))) (*.f64 (*.f64 b x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))))) |
(* -1 (* b (+ (* -1 (/ (+ (* -1 (/ (* x-scale (+ (* 1/8 (+ (* -1/2 (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (sin (* 1/180 (* angle (PI)))))))) b)) (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))) b)) (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))) |
(neg.f64 (*.f64 b (+.f64 (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (*.f64 x-scale (*.f64 #s(literal 1/8 binary64) (+.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64))))) (*.f64 y-scale y-scale)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) b)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 a #s(literal 0 binary64))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) b)) (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))))) |
(* -1 (* b (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (/ (* x-scale (+ (* -1 (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 a) (* 2 a))))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* 4 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (+ (* -2 a) (* 2 a)))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))))) b)) (* x-scale (+ (* 1/8 (+ (* -1/2 (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (sin (* 1/180 (* angle (PI))))))))) b)) (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))) b)) (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))) |
(neg.f64 (*.f64 b (+.f64 (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 x-scale (+.f64 (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 a #s(literal 0 binary64))))) (*.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 a #s(literal 0 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) b) (*.f64 x-scale (*.f64 #s(literal 1/8 binary64) (+.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64))))) (*.f64 y-scale y-scale)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) b)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 a #s(literal 0 binary64))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) b)) (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))))) |
(* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (pow b 2)) (pow b 2))))) (* a (pow x-scale 2)))) (* 1/4 (* a (* (sqrt 2) (sqrt 8)))))) |
(*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 #s(literal 0 binary64) (*.f64 b b)))) (*.f64 a (*.f64 x-scale x-scale))) (*.f64 (*.f64 #s(literal 1/4 binary64) a) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(+ (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (pow b 2)) (pow b 2))))) (* a (pow x-scale 2)))) (* 1/4 (* a (* (sqrt 2) (sqrt 8)))))) (* (pow angle 2) (* x-scale (+ (* 1/8 (+ (* -1/2 (/ (* (pow y-scale 4) (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1 (pow b 2)) (pow b 2)) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))))) (* (pow a 3) (pow x-scale 2)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))))))) (* a (pow x-scale 2))))) (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 2) (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))))) a)))))) |
(fma.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 #s(literal 0 binary64) (*.f64 b b)))) (*.f64 a (*.f64 x-scale x-scale))) (*.f64 (*.f64 #s(literal 1/4 binary64) a) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 (*.f64 angle angle) x-scale) (*.f64 #s(literal 1/8 binary64) (+.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 #s(literal 0 binary64) (*.f64 b b))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 a (*.f64 a a)) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale)))) (*.f64 a a)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)))) (*.f64 a a))))))))) (*.f64 a (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale))))) a))))) |
(+ (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (pow b 2)) (pow b 2))))) (* a (pow x-scale 2)))) (* 1/4 (* a (* (sqrt 2) (sqrt 8)))))) (* (pow angle 2) (+ (* x-scale (+ (* 1/8 (+ (* -1/2 (/ (* (pow y-scale 4) (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1 (pow b 2)) (pow b 2)) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))))) (* (pow a 3) (pow x-scale 2)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))))))) (* a (pow x-scale 2))))) (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 2) (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))))) a)))) (* (pow angle 2) (* x-scale (+ (* 1/8 (+ (* -1/2 (/ (* a (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (+ (* 1/4 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (/ (* (pow y-scale 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (pow a 4)))) (+ (* -1 (pow b 2)) (pow b 2)))))) (pow x-scale 2))) (+ (* -1/2 (/ (* (pow y-scale 4) (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2))))))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))))) (* (pow a 3) (pow x-scale 2)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (+ (* (pow b 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 2))))) (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))))) (pow a 2)) (+ (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))) (pow a 2))) (/ (* (pow y-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))) (pow a 2))))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))) (* a (pow x-scale 2)))))) (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 2) (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 2))))))) a)))))))) |
(fma.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 #s(literal 0 binary64) (*.f64 b b)))) (*.f64 a (*.f64 x-scale x-scale))) (*.f64 (*.f64 #s(literal 1/4 binary64) a) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 angle angle) (fma.f64 x-scale (*.f64 #s(literal 1/8 binary64) (+.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 #s(literal 0 binary64) (*.f64 b b))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 a (*.f64 a a)) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale)))) (*.f64 a a)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)))) (*.f64 a a))))))))) (*.f64 a (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale))))) a))) (*.f64 (*.f64 angle angle) (*.f64 x-scale (*.f64 #s(literal 1/8 binary64) (+.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 a (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 (+.f64 (neg.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale))))) (pow.f64 a #s(literal 6 binary64)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale))))) (pow.f64 a #s(literal 6 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)))) (pow.f64 a #s(literal 4 binary64))))) (*.f64 #s(literal 0 binary64) (*.f64 b b))))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale)))) (*.f64 a a)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)))) (*.f64 a a)))))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 a (*.f64 a a)) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 y-scale y-scale)) #s(literal -1/787320000 binary64))))) (*.f64 a a)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)))) (*.f64 a a)) (/.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale)))) (*.f64 a a)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)))) (*.f64 a a))))) (*.f64 a a)))) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))))))) (*.f64 a (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 a a)))))) a)))))))) |
(+ (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (pow b 2)) (pow b 2))))) (* a (pow x-scale 2)))) (* 1/4 (* a (* (sqrt 2) (sqrt 8)))))) (* (pow angle 2) (+ (* x-scale (+ (* 1/8 (+ (* -1/2 (/ (* (pow y-scale 4) (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1 (pow b 2)) (pow b 2)) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))))) (* (pow a 3) (pow x-scale 2)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))))))) (* a (pow x-scale 2))))) (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 2) (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))))) a)))) (* (pow angle 2) (+ (* x-scale (+ (* 1/8 (+ (* -1/2 (/ (* a (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (+ (* 1/4 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (/ (* (pow y-scale 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (pow a 4)))) (+ (* -1 (pow b 2)) (pow b 2)))))) (pow x-scale 2))) (+ (* -1/2 (/ (* (pow y-scale 4) (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2))))))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))))) (* (pow a 3) (pow x-scale 2)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (+ (* (pow b 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 2))))) (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))))) (pow a 2)) (+ (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))) (pow a 2))) (/ (* (pow y-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))) (pow a 2))))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))) (* a (pow x-scale 2)))))) (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 2) (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 2))))))) a)))) (* (pow angle 2) (* x-scale (+ (* 1/8 (+ (* -1/2 (/ (* a (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1 (/ (* (pow y-scale 2) (* (+ (* -1 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (/ (* (pow y-scale 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (pow a 4))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2))) (+ (* -1 (/ (* (pow y-scale 6) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))) (pow a 6))) (+ (* 1/2 (/ (* (pow y-scale 2) (* (+ (* -1 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (+ (* 1/4 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (/ (* (pow y-scale 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (pow a 4)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2))) (/ (* (pow y-scale 4) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (pow a 4))))) (+ (* -1 (pow b 2)) (pow b 2)))))) (pow x-scale 2))) (+ (* -1/2 (/ (* a (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (+ (* 1/4 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (/ (* (pow y-scale 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (pow a 4)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2))))))))))) (pow x-scale 2))) (+ (* -1/2 (/ (* (pow y-scale 4) (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (+ (* (pow b 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 2))))) (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))))) (pow a 2)) (+ (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))) (pow a 2))) (/ (* (pow y-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))) (pow a 2))))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))))))) (* (pow a 3) (pow x-scale 2)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (+ (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (+ (* (pow b 2) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))))) (pow y-scale 2)))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- b a) 2)))) (pow y-scale 2))) (/ (* (pow (+ a b) 2) (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- b a) 2))) (pow y-scale 2))))))) (pow a 2)) (+ (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))))) (pow a 2))) (+ (/ (* (pow y-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (+ (* (pow b 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 2))))) (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))))) (pow a 2)) (+ (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))) (pow a 2))) (/ (* (pow y-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))) (pow a 2)))))) (pow a 2)) (/ (* (pow y-scale 2) (* (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))) (pow a 2)))))) (+ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6))))))))) (* a (pow x-scale 2))))))) (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 2) (* (sqrt 8) (- (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 2)))))) (pow a 2))))))) a)))))))))) |
(fma.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 #s(literal 0 binary64) (*.f64 b b)))) (*.f64 a (*.f64 x-scale x-scale))) (*.f64 (*.f64 #s(literal 1/4 binary64) a) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 angle angle) (fma.f64 x-scale (*.f64 #s(literal 1/8 binary64) (+.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 #s(literal 0 binary64) (*.f64 b b))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 a (*.f64 a a)) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale)))) (*.f64 a a)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)))) (*.f64 a a))))))))) (*.f64 a (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale))))) a))) (*.f64 (*.f64 angle angle) (fma.f64 x-scale (*.f64 #s(literal 1/8 binary64) (+.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 a (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 (+.f64 (neg.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale))))) (pow.f64 a #s(literal 6 binary64)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale))))) (pow.f64 a #s(literal 6 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)))) (pow.f64 a #s(literal 4 binary64))))) (*.f64 #s(literal 0 binary64) (*.f64 b b))))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale)))) (*.f64 a a)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)))) (*.f64 a a)))))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 a (*.f64 a a)) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 y-scale y-scale)) #s(literal -1/787320000 binary64))))) (*.f64 a a)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)))) (*.f64 a a)) (/.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale)))) (*.f64 a a)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)))) (*.f64 a a))))) (*.f64 a a)))) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))))))) (*.f64 a (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 a a)))))) a))) (*.f64 (*.f64 (*.f64 angle angle) x-scale) (*.f64 #s(literal 1/8 binary64) (+.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 a (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 (+.f64 (+.f64 (neg.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (+.f64 (neg.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale))))) (pow.f64 a #s(literal 6 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)))) (pow.f64 a #s(literal 4 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 a a))) (neg.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))))) (pow.f64 a #s(literal 6 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (+.f64 (neg.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale))))) (pow.f64 a #s(literal 6 binary64)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale))))) (pow.f64 a #s(literal 6 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)))) (pow.f64 a #s(literal 4 binary64))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 a a)) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (*.f64 y-scale y-scale)))) (pow.f64 a #s(literal 4 binary64))))) (*.f64 #s(literal 0 binary64) (*.f64 b b))))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (neg.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale))))) (pow.f64 a #s(literal 6 binary64)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale))))) (pow.f64 a #s(literal 6 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)))) (pow.f64 a #s(literal 4 binary64)))))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale)))) (*.f64 a a)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)))) (*.f64 a a))))))))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 y-scale y-scale)) #s(literal -1/787320000 binary64))))) (*.f64 a a)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)))) (*.f64 a a)) (/.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale)))) (*.f64 a a)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)))) (*.f64 a a))))) (*.f64 a a)))) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))))))) (*.f64 (*.f64 a (*.f64 a a)) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))) (fma.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)))) (fma.f64 (*.f64 b b) (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 4 binary64) (fma.f64 #s(literal 1/102036672000000 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))))))) (*.f64 a a)) (+.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 y-scale y-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (*.f64 y-scale y-scale))))) (*.f64 a a)) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 y-scale y-scale)) #s(literal -1/787320000 binary64))))) (*.f64 a a)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)))) (*.f64 a a)) (/.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale)))) (*.f64 a a)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)))) (*.f64 a a))))) (*.f64 a a)))))) (*.f64 a a))) (/.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale)))) (*.f64 a a)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)))) (*.f64 a a))))) (*.f64 a a)))) (fma.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))))))) (*.f64 a (*.f64 x-scale x-scale)))))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)))) (+.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 a a))))) (*.f64 a a)))))) a))))))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) |
(*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) |
(*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) |
(*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) |
(*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) |
(*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) |
(*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) |
(*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) |
(*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) |
(* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/4 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))) |
(*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 b (*.f64 x-scale x-scale)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))) |
(+ (* 1/4 (/ (* a (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))))))) (* (pow b 3) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/4 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))) |
(fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 a (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64))))) (*.f64 (*.f64 (*.f64 b (*.f64 b b)) x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 b (*.f64 x-scale x-scale)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))) |
(+ (* a (+ (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))))) (* (pow b 3) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* a (* x-scale (+ (* 1/8 (+ (* -1/2 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow b 3) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))))) (* 1/8 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))) (* b (sin (* 1/180 (* angle (PI)))))))))))) (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/4 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))) |
(fma.f64 a (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64))))) (*.f64 (*.f64 (*.f64 b (*.f64 b b)) x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 a x-scale) (*.f64 #s(literal 1/8 binary64) (+.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 (*.f64 b (*.f64 b b)) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (*.f64 b (*.f64 x-scale x-scale)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 b (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 b (*.f64 x-scale x-scale)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))) |
(+ (* a (+ (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))))) (* (pow b 3) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* a (+ (* 1/8 (* a (* x-scale (+ (* -1 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))))) (* (pow b 5) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (pow b 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))))))) (* x-scale (+ (* 1/8 (+ (* -1/2 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow b 3) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))))) (* 1/8 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))) (* b (sin (* 1/180 (* angle (PI))))))))))))) (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/4 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))) |
(fma.f64 a (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64))))) (*.f64 (*.f64 (*.f64 b (*.f64 b b)) x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 a (fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 a x-scale) (+.f64 (neg.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64))))) (*.f64 (*.f64 (pow.f64 b #s(literal 5 binary64)) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b #s(literal 0 binary64))) (*.f64 b b)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (*.f64 (*.f64 b (*.f64 x-scale x-scale)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 x-scale (*.f64 #s(literal 1/8 binary64) (+.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 (*.f64 b (*.f64 b b)) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (*.f64 b (*.f64 x-scale x-scale)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 b (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 b (*.f64 x-scale x-scale)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))) |
(* a (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))) |
(*.f64 (*.f64 a x-scale) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))) |
(* a (+ (* 1/4 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))))) (* a (* x-scale (cos (* 1/180 (* angle (PI)))))))) (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))) |
(*.f64 a (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 b #s(literal 0 binary64)))))) (*.f64 (*.f64 a x-scale) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))) |
(* a (+ (* 1/4 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))))) (* a (* x-scale (cos (* 1/180 (* angle (PI)))))))) (+ (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (/ (* x-scale (+ (* 1/8 (+ (* -1/2 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (* 1/8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (cos (* 1/180 (* angle (PI)))))))) (pow a 2))))) |
(*.f64 a (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 b #s(literal 0 binary64)))))) (*.f64 (*.f64 a x-scale) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (fma.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (/.f64 (*.f64 x-scale (*.f64 #s(literal 1/8 binary64) (+.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64))))) (*.f64 y-scale y-scale)))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 a a))))) |
(* a (+ (* 1/8 (/ (* x-scale (+ (* -1 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 b) (* 2 b))))))) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* 4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (+ (* -2 b) (* 2 b)))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))))) (pow a 3))) (+ (* 1/4 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))))) (* a (* x-scale (cos (* 1/180 (* angle (PI)))))))) (+ (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (/ (* x-scale (+ (* 1/8 (+ (* -1/2 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (* 1/8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (cos (* 1/180 (* angle (PI)))))))) (pow a 2)))))) |
(*.f64 a (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (+.f64 (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 b b) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 b #s(literal 0 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 b #s(literal 0 binary64)))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 x-scale x-scale) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 a (*.f64 a a))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 b #s(literal 0 binary64)))))) (*.f64 (*.f64 a x-scale) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (fma.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (/.f64 (*.f64 x-scale (*.f64 #s(literal 1/8 binary64) (+.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64))))) (*.f64 y-scale y-scale)))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 a a)))))) |
(* -1 (* a (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))) |
(neg.f64 (*.f64 (*.f64 a x-scale) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))) |
(* -1 (* a (+ (* -1/4 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))))) (* a (* x-scale (cos (* 1/180 (* angle (PI)))))))) (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))) |
(neg.f64 (*.f64 a (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 b #s(literal 0 binary64)))))) (*.f64 (*.f64 a x-scale) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))))) |
(* -1 (* a (+ (* -1 (/ (+ (* -1 (/ (* x-scale (+ (* 1/8 (+ (* -1/2 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (* 1/8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (cos (* 1/180 (* angle (PI)))))))) a)) (* 1/4 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))) a)) (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))) |
(neg.f64 (*.f64 a (+.f64 (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (*.f64 x-scale (*.f64 #s(literal 1/8 binary64) (+.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64))))) (*.f64 y-scale y-scale)))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) a)) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 b #s(literal 0 binary64))))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) a)) (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))))) |
(* -1 (* a (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (/ (* x-scale (+ (* -1 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 b) (* 2 b))))))) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* 4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (+ (* -2 b) (* 2 b)))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))))) a)) (* x-scale (+ (* 1/8 (+ (* -1/2 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (* 1/8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (cos (* 1/180 (* angle (PI))))))))) a)) (* 1/4 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))) a)) (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))) |
(neg.f64 (*.f64 a (+.f64 (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 x-scale (+.f64 (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 b b) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 b #s(literal 0 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 b #s(literal 0 binary64)))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 x-scale x-scale) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) a) (*.f64 x-scale (*.f64 #s(literal 1/8 binary64) (+.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64))))) (*.f64 y-scale y-scale)))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) a)) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 b #s(literal 0 binary64))))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) a)) (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))))) |
(* b (sqrt 2)) |
(*.f64 b (sqrt.f64 #s(literal 2 binary64))) |
(+ (* 1/2 (/ (* (pow angle 2) (* (sqrt 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))))) b)) (* b (sqrt 2))) |
(fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 angle angle) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))))) b) (*.f64 b (sqrt.f64 #s(literal 2 binary64)))) |
(+ (* b (sqrt 2)) (* (pow angle 2) (+ (* 1/2 (/ (* (sqrt 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) b)) (* 1/2 (/ (* (pow angle 2) (* (sqrt 2) (- (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (* 1/4 (/ (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2) (pow b 2)))))) b))))) |
(fma.f64 b (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 angle angle) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))))) b) (/.f64 (*.f64 (*.f64 (*.f64 angle angle) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64)))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))))) (*.f64 b b))))) b))))) |
(+ (* b (sqrt 2)) (* (pow angle 2) (+ (* 1/2 (/ (* (sqrt 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) b)) (* (pow angle 2) (+ (* 1/2 (/ (* (sqrt 2) (- (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (* 1/4 (/ (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2) (pow b 2))))) b)) (* 1/2 (/ (* (pow angle 2) (* (sqrt 2) (- (+ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6))))) (* 1/2 (/ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (- (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (* 1/4 (/ (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2) (pow b 2))))) (pow b 2)))))) b))))))) |
(fma.f64 b (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))))) b) (*.f64 (*.f64 angle angle) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64)))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))))) (*.f64 b b))))) b) (/.f64 (*.f64 (*.f64 (*.f64 angle angle) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (fma.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64)))) (+.f64 (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64)))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))))) (*.f64 b b))))) (*.f64 b b))))) b))))))) |
(* (sqrt 2) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) |
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) |
(* (sqrt 2) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) |
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) |
(* (sqrt 2) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) |
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) |
(* (sqrt 2) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) |
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) |
(* (sqrt 2) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) |
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) |
(* (sqrt 2) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) |
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) |
(* (sqrt 2) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) |
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) |
(* (sqrt 2) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) |
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) |
(* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))) |
(*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))) |
(+ (* 1/2 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (sqrt 2))) (* a (sin (* 1/180 (* angle (PI))))))) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) |
(fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) |
(+ (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))) (* (pow b 2) (+ (* -1/8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (sqrt 2))) (* (pow a 3) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* 1/2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (sqrt 2)) (* a (sin (* 1/180 (* angle (PI)))))))))) |
(fma.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a (*.f64 a a)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) |
(+ (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))) (* (pow b 2) (+ (* 1/2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (sqrt 2)) (* a (sin (* 1/180 (* angle (PI))))))) (* (pow b 2) (+ (* -1/8 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (sqrt 2)) (* (pow a 3) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* 1/16 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 6) (sqrt 2))) (* (pow a 5) (pow (sin (* 1/180 (* angle (PI)))) 5))))))))) |
(fma.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a (*.f64 a a)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 5 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)))))))))) |
(* b (* (cos (* 1/180 (* angle (PI)))) (sqrt 2))) |
(*.f64 b (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))) |
(* b (+ (* 1/2 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 2))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* (cos (* 1/180 (* angle (PI)))) (sqrt 2)))) |
(*.f64 b (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 b b) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) |
(* b (+ (* -1/8 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 2))) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/2 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 2))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* (cos (* 1/180 (* angle (PI)))) (sqrt 2))))) |
(*.f64 b (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 b b) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))) |
(* b (+ (* -1/8 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 2))) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/16 (/ (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (sqrt 2))) (* (pow b 6) (pow (cos (* 1/180 (* angle (PI)))) 5)))) (+ (* 1/2 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 2))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* (cos (* 1/180 (* angle (PI)))) (sqrt 2)))))) |
(*.f64 b (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 b b) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))) |
(* -1 (* b (* (cos (* 1/180 (* angle (PI)))) (sqrt 2)))) |
(neg.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) |
(* -1 (* b (+ (* 1/2 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 2))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* (cos (* 1/180 (* angle (PI)))) (sqrt 2))))) |
(neg.f64 (*.f64 b (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 b b) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))) |
(* -1 (* b (+ (* -1/8 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 2))) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/2 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 2))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* (cos (* 1/180 (* angle (PI)))) (sqrt 2)))))) |
(neg.f64 (*.f64 b (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 b b) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))) |
(* -1 (* b (+ (* -1/8 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 2))) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/16 (/ (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (sqrt 2))) (* (pow b 6) (pow (cos (* 1/180 (* angle (PI)))) 5)))) (+ (* 1/2 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 2))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* (cos (* 1/180 (* angle (PI)))) (sqrt 2))))))) |
(neg.f64 (*.f64 b (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 b b) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))) |
(* b (* (cos (* 1/180 (* angle (PI)))) (sqrt 2))) |
(*.f64 b (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))) |
(+ (* 1/2 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 2))) (* b (cos (* 1/180 (* angle (PI))))))) (* b (* (cos (* 1/180 (* angle (PI)))) (sqrt 2)))) |
(fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 b (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 b (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) |
(+ (* b (* (cos (* 1/180 (* angle (PI)))) (sqrt 2))) (* (pow a 2) (+ (* -1/8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 2))) (* (pow b 3) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (* 1/2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 2)) (* b (cos (* 1/180 (* angle (PI)))))))))) |
(fma.f64 b (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 b (*.f64 b b)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 b (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) |
(+ (* b (* (cos (* 1/180 (* angle (PI)))) (sqrt 2))) (* (pow a 2) (+ (* 1/2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 2)) (* b (cos (* 1/180 (* angle (PI))))))) (* (pow a 2) (+ (* -1/8 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 2)) (* (pow b 3) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (* 1/16 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (sqrt 2))) (* (pow b 5) (pow (cos (* 1/180 (* angle (PI)))) 5))))))))) |
(fma.f64 b (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 b (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 b (*.f64 b b)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (/.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 5 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64))))))))) |
(* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))) |
(*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))) |
(* a (+ (* 1/2 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (sqrt 2))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) |
(*.f64 a (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) |
(* a (+ (* -1/8 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (sqrt 2))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/2 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (sqrt 2))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) |
(*.f64 a (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))) |
(* a (+ (* -1/8 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (sqrt 2))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/16 (/ (* (pow b 6) (* (pow (cos (* 1/180 (* angle (PI)))) 6) (sqrt 2))) (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 5)))) (+ (* 1/2 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (sqrt 2))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))) |
(*.f64 a (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 6 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))) |
(* -1 (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) |
(neg.f64 (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) |
(* -1 (* a (+ (* 1/2 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (sqrt 2))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) |
(neg.f64 (*.f64 a (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))) |
(* -1 (* a (+ (* -1/8 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (sqrt 2))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/2 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (sqrt 2))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))) |
(neg.f64 (*.f64 a (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))) |
(* -1 (* a (+ (* -1/8 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (sqrt 2))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/16 (/ (* (pow b 6) (* (pow (cos (* 1/180 (* angle (PI)))) 6) (sqrt 2))) (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 5)))) (+ (* 1/2 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (sqrt 2))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))) |
(neg.f64 (*.f64 a (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 6 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))) |
1 |
#s(literal 1 binary64) |
(+ 1 (* -1/64800 (* (pow angle 2) (pow (PI) 2)))) |
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/64800 binary64) (*.f64 angle angle)) (*.f64 (PI.f64) (PI.f64)))) |
(+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* 1/25194240000 (* (pow angle 2) (pow (PI) 4)))))) |
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/64800 binary64) (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 #s(literal 1/25194240000 binary64) (*.f64 angle angle)) (pow.f64 (PI.f64) #s(literal 4 binary64)))))) |
(+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/24488801280000000 (* (pow angle 2) (pow (PI) 6))) (* 1/25194240000 (pow (PI) 4))))))) |
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/64800 binary64) (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/24488801280000000 binary64) (*.f64 (*.f64 angle angle) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/25194240000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) |
(cos (* 1/180 (* angle (PI)))) |
(cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
(cos (* 1/180 (* angle (PI)))) |
(cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
(cos (* 1/180 (* angle (PI)))) |
(cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
(cos (* 1/180 (* angle (PI)))) |
(cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
(cos (* 1/180 (* angle (PI)))) |
(cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
(cos (* 1/180 (* angle (PI)))) |
(cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
(cos (* 1/180 (* angle (PI)))) |
(cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
(cos (* 1/180 (* angle (PI)))) |
(cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
(* 1/180 (* angle (PI))) |
(*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) |
(* angle (+ (* -1/34992000 (* (pow angle 2) (pow (PI) 3))) (* 1/180 (PI)))) |
(*.f64 angle (fma.f64 (*.f64 #s(literal -1/34992000 binary64) (*.f64 angle angle)) (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/180 binary64) (PI.f64)))) |
(* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* 1/22674816000000 (* (pow angle 2) (pow (PI) 5))))))) |
(*.f64 angle (fma.f64 #s(literal 1/180 binary64) (PI.f64) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/34992000 binary64) (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 angle angle)) (pow.f64 (PI.f64) #s(literal 5 binary64))))))) |
(* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* (pow angle 2) (+ (* -1/30855889612800000000 (* (pow angle 2) (pow (PI) 7))) (* 1/22674816000000 (pow (PI) 5)))))))) |
(*.f64 angle (fma.f64 #s(literal 1/180 binary64) (PI.f64) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/34992000 binary64) (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 angle angle) (fma.f64 (*.f64 #s(literal -1/30855889612800000000 binary64) (*.f64 angle angle)) (pow.f64 (PI.f64) #s(literal 7 binary64)) (*.f64 #s(literal 1/22674816000000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))))))))) |
(sin (* 1/180 (* angle (PI)))) |
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
(sin (* 1/180 (* angle (PI)))) |
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
(sin (* 1/180 (* angle (PI)))) |
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
(sin (* 1/180 (* angle (PI)))) |
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
(sin (* 1/180 (* angle (PI)))) |
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
(sin (* 1/180 (* angle (PI)))) |
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
(sin (* 1/180 (* angle (PI)))) |
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
(sin (* 1/180 (* angle (PI)))) |
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
1 |
#s(literal 1 binary64) |
(+ 1 (* -1/64800 (* (pow angle 2) (pow (PI) 2)))) |
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/64800 binary64) (*.f64 angle angle)) (*.f64 (PI.f64) (PI.f64)))) |
(+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* 1/25194240000 (* (pow angle 2) (pow (PI) 4)))))) |
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/64800 binary64) (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 #s(literal 1/25194240000 binary64) (*.f64 angle angle)) (pow.f64 (PI.f64) #s(literal 4 binary64)))))) |
(+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/24488801280000000 (* (pow angle 2) (pow (PI) 6))) (* 1/25194240000 (pow (PI) 4))))))) |
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/64800 binary64) (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/24488801280000000 binary64) (*.f64 (*.f64 angle angle) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/25194240000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) |
(cos (* 1/180 (* angle (PI)))) |
(cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
(cos (* 1/180 (* angle (PI)))) |
(cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
(cos (* 1/180 (* angle (PI)))) |
(cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
(cos (* 1/180 (* angle (PI)))) |
(cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
(cos (* 1/180 (* angle (PI)))) |
(cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
(cos (* 1/180 (* angle (PI)))) |
(cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
(cos (* 1/180 (* angle (PI)))) |
(cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
(cos (* 1/180 (* angle (PI)))) |
(cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))) |
(+ (* 1/16 (* (/ (* a (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) |
(fma.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 a (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64))))) (*.f64 x-scale y-scale))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))) (* a (+ (* 1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* 1/8 (* (* a (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (+ (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (sqrt (/ 1 (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))) (*.f64 a (fma.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64)))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/8 binary64) (*.f64 a (*.f64 x-scale (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64)) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64)) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64)))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))) (* a (+ (* 1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* a (+ (* 1/8 (* (* a (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 (pow b 3)) (* 2 (pow b 3))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (* 1/4 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 (pow b 3)) (* 2 (pow b 3))) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (+ (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))) (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (+ (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))) (sqrt (/ 1 (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))) (*.f64 a (fma.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64)))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 a (*.f64 #s(literal 1/8 binary64) (fma.f64 (*.f64 (*.f64 a x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b #s(literal 0 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64))) (-.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64)) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64)) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64)) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64)))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))) (*.f64 x-scale (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64)) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64)) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64)))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))))))))))) |
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 a (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)))))) |
(* a (+ (* 1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))) (* a (* x-scale y-scale))) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) |
(*.f64 a (fma.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 b #s(literal 0 binary64)))) (*.f64 a (*.f64 x-scale y-scale)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)))))))) |
(* a (+ (* 1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))) (* a (* x-scale y-scale))) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))))))) (pow a 2)) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))))) |
(*.f64 a (fma.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 b #s(literal 0 binary64)))) (*.f64 a (*.f64 x-scale y-scale))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 b #s(literal 0 binary64)) (*.f64 b #s(literal 0 binary64))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 b #s(literal 0 binary64)) (*.f64 b #s(literal 0 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)))))))))) (*.f64 a a)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))))))))) |
(* a (+ (* 1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))) (* a (* x-scale y-scale))) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 b) (* 2 b)) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (* 1/4 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 b) (* 2 b)) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))))))) (pow a 3)) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))))))) (pow a 2)) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))))) |
(*.f64 a (fma.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 b #s(literal 0 binary64)))) (*.f64 a (*.f64 x-scale y-scale))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b #s(literal 0 binary64))) (-.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 b #s(literal 0 binary64)) (*.f64 b #s(literal 0 binary64))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b #s(literal 0 binary64))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 b #s(literal 0 binary64)) (*.f64 b #s(literal 0 binary64))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 b #s(literal 0 binary64)) (*.f64 b #s(literal 0 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))))))))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))))))))) (*.f64 a (*.f64 a a))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 b #s(literal 0 binary64)) (*.f64 b #s(literal 0 binary64))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 b #s(literal 0 binary64)) (*.f64 b #s(literal 0 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)))))))))) (*.f64 a a)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)))))))))) |
(* -1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) |
(*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 a (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)))))) |
(* -1 (* a (+ (* -1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))) (* a (* x-scale y-scale))) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))))) |
(neg.f64 (*.f64 a (fma.f64 (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 b #s(literal 0 binary64)))) (*.f64 a (*.f64 x-scale y-scale)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))))))))) |
(* -1 (* a (+ (* -1 (/ (+ (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))))))) a) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))) (* 1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))))) a)) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))))) |
(neg.f64 (*.f64 a (+.f64 (neg.f64 (/.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 b #s(literal 0 binary64)) (*.f64 b #s(literal 0 binary64))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 b #s(literal 0 binary64)) (*.f64 b #s(literal 0 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)))))))))) a) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 b #s(literal 0 binary64)))) (*.f64 x-scale y-scale))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))))))))) a)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))))))))) |
(* -1 (* a (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 b) (* 2 b)) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (* 1/4 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 b) (* 2 b)) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))))))) a) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))) (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))))))) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) a)) (* 1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))))) a)) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))))) |
(neg.f64 (*.f64 a (+.f64 (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b #s(literal 0 binary64))) (-.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 b #s(literal 0 binary64)) (*.f64 b #s(literal 0 binary64))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b #s(literal 0 binary64))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 b #s(literal 0 binary64)) (*.f64 b #s(literal 0 binary64))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 b #s(literal 0 binary64)) (*.f64 b #s(literal 0 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))))))))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))))))))) a) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))))))) (*.f64 #s(literal 1/8 binary64) (*.f64 x-scale (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 b #s(literal 0 binary64)) (*.f64 b #s(literal 0 binary64))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 b #s(literal 0 binary64)) (*.f64 b #s(literal 0 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)))))))))) a)) (*.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 b #s(literal 0 binary64)))) (*.f64 x-scale y-scale))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))))))))) a)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))))) |
(+ (* 1/16 (* (/ (* b (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) |
(fma.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 b (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64))))) (*.f64 x-scale y-scale))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* b (+ (* 1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* 1/8 (* (* b (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (+ (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (sqrt (/ 1 (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))))) (*.f64 b (fma.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64)))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (*.f64 b x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (-.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (-.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64)) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64)) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64)))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* b (+ (* 1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* b (+ (* 1/8 (* (* b (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 (pow a 3)) (* 2 (pow a 3))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (* 1/4 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 (pow a 3)) (* 2 (pow a 3))) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (+ (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (+ (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (sqrt (/ 1 (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))))) (*.f64 b (fma.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64)))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 b (*.f64 #s(literal 1/8 binary64) (fma.f64 (*.f64 (*.f64 b x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a #s(literal 0 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64))) (-.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64)) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64))) (-.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (-.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64)) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64)) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64)))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))))) (*.f64 x-scale (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (-.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (-.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64)) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64)) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64)))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))))))))))))) |
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))))) |
(* b (+ (* 1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))) (* b (* x-scale y-scale))) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) |
(*.f64 b (fma.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 b (*.f64 x-scale y-scale)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))))))) |
(* b (+ (* 1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))) (* b (* x-scale y-scale))) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))))))) (pow b 2)) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))))) |
(*.f64 b (fma.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 b (*.f64 x-scale y-scale))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))) (-.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 a #s(literal 0 binary64)) (*.f64 a #s(literal 0 binary64))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 a #s(literal 0 binary64)) (*.f64 a #s(literal 0 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))))))))) (*.f64 b b)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))))))) |
(* b (+ (* 1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))) (* b (* x-scale y-scale))) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 a) (* 2 a)) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (* 1/4 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 a) (* 2 a)) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))))))) (pow b 3)) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))))))) (pow b 2)) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))))) |
(*.f64 b (fma.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 b (*.f64 x-scale y-scale))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a #s(literal 0 binary64))) (-.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 a #s(literal 0 binary64)) (*.f64 a #s(literal 0 binary64))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a #s(literal 0 binary64))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))) (-.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 a #s(literal 0 binary64)) (*.f64 a #s(literal 0 binary64))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 a #s(literal 0 binary64)) (*.f64 a #s(literal 0 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))))))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))))))))) (*.f64 b (*.f64 b b))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))) (-.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 a #s(literal 0 binary64)) (*.f64 a #s(literal 0 binary64))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 a #s(literal 0 binary64)) (*.f64 a #s(literal 0 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))))))))) (*.f64 b b)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))))))))) |
(* -1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))) |
(*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 b (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))))) |
(* -1 (* b (+ (* -1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))) (* b (* x-scale y-scale))) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))))) |
(neg.f64 (*.f64 b (fma.f64 (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 b (*.f64 x-scale y-scale)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))))))) |
(* -1 (* b (+ (* -1 (/ (+ (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))))))) b) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (* 1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))))) b)) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))))) |
(neg.f64 (*.f64 b (+.f64 (neg.f64 (/.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))) (-.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 a #s(literal 0 binary64)) (*.f64 a #s(literal 0 binary64))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 a #s(literal 0 binary64)) (*.f64 a #s(literal 0 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))))))))) b) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 x-scale y-scale))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))))))) b)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))))))) |
(* -1 (* b (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 a) (* 2 a)) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (* 1/4 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 a) (* 2 a)) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))))))) b) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))))))) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) b)) (* 1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))))) b)) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))))) |
(neg.f64 (*.f64 b (+.f64 (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a #s(literal 0 binary64))) (-.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 a #s(literal 0 binary64)) (*.f64 a #s(literal 0 binary64))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a #s(literal 0 binary64))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))) (-.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 a #s(literal 0 binary64)) (*.f64 a #s(literal 0 binary64))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 a #s(literal 0 binary64)) (*.f64 a #s(literal 0 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))))))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))))))))) b) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))))) (*.f64 #s(literal 1/8 binary64) (*.f64 x-scale (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))) (-.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 a #s(literal 0 binary64)) (*.f64 a #s(literal 0 binary64))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 a #s(literal 0 binary64)) (*.f64 a #s(literal 0 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))))))))) b)) (*.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 x-scale y-scale))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))))))) b)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))))))) |
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))) |
(+ (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) |
(fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))))) |
(+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 #s(literal 1/8 binary64) (fma.f64 y-scale (*.f64 (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))))))))) |
(+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 #s(literal 1/8 binary64) (fma.f64 y-scale (*.f64 (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) #s(literal 2 binary64)))))) (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))))) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))) |
(*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) |
(*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))))) (pow.f64 x-scale #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))) (pow x-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))))) |
(*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))))) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))))) (pow.f64 x-scale #s(literal 6 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))))) (pow.f64 x-scale #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))))))) |
(* -1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))) |
(*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))) |
(* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) |
(neg.f64 (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))))) |
(* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))))) |
(neg.f64 (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))))) (pow.f64 x-scale #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))))))) |
(* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))) (pow x-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))))) |
(neg.f64 (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))))) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))))) (pow.f64 x-scale #s(literal 6 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))))) (pow.f64 x-scale #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))))))) |
(* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))) |
(+ (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) |
(fma.f64 #s(literal 1/8 binary64) (*.f64 x-scale (*.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))))) |
(+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))) (*.f64 (*.f64 y-scale y-scale) (*.f64 #s(literal 1/8 binary64) (fma.f64 x-scale (*.f64 (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))))) (*.f64 x-scale (*.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))))))))) |
(+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))))) (*.f64 (*.f64 y-scale y-scale) (*.f64 #s(literal 1/8 binary64) (fma.f64 x-scale (*.f64 (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))))) (*.f64 x-scale (*.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) #s(literal 2 binary64)))))) (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))))) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))))) |
(* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))) |
(*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 y-scale y-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))))))) |
(* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) |
(*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 y-scale y-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))))))) (pow.f64 y-scale #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))))) |
(* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))) (pow y-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))))) |
(*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 y-scale y-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)))))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))))))) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))))))) (pow.f64 y-scale #s(literal 6 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))))))) (pow.f64 y-scale #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))))))))) |
(* -1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) |
(*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))))) |
(* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) |
(neg.f64 (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 y-scale y-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))))) |
(* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))))) |
(neg.f64 (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 y-scale y-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))))))) (pow.f64 y-scale #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))))))))) |
(* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))) (pow y-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))))) |
(neg.f64 (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 y-scale y-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)))))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))))))) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))))))) (pow.f64 y-scale #s(literal 6 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))))))) (pow.f64 y-scale #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))))))) |
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) |
(+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))))))) (* b (sqrt 2)))) (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))) |
(fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 angle angle) (*.f64 x-scale x-scale)) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))))) (*.f64 b (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))) |
(+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/2 (/ (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))))) (* b (sqrt 2))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b y-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (*.f64 angle angle) (*.f64 #s(literal 1/8 binary64) (+.f64 (/.f64 (*.f64 (*.f64 (*.f64 angle angle) (*.f64 x-scale x-scale)) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (fma.f64 #s(literal -1/196830000 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (pow.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))))) (*.f64 b (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))))) (*.f64 b (sqrt.f64 #s(literal 2 binary64)))))))) |
(+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))))) (* b (sqrt 2)))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow y-scale 2))) (+ (* -1/765275040000000 (/ (* (pow b 2) (pow (PI) 6)) (pow x-scale 2))) (+ (* 1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow x-scale 2))) (+ (* 1/765275040000000 (/ (* (pow b 2) (pow (PI) 6)) (pow y-scale 2))) (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))))) (+ (* 2 (* (- (+ (* -1/765275040000000 (/ (* (pow b 2) (pow (PI) 6)) (pow x-scale 2))) (* 1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow x-scale 2)))) (+ (* -1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow y-scale 2))) (* 1/765275040000000 (/ (* (pow b 2) (pow (PI) 6)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow (+ a b) 2) (* (+ (* 1/31886460000000 (pow (PI) 6)) (* 1/19131876000000 (pow (PI) 6))) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (* 1/2 (/ (* (pow x-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/2 (/ (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/2 (/ (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2)))))))) (* b (sqrt 2))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b y-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))))) (*.f64 b (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 angle angle) (*.f64 #s(literal 1/8 binary64) (+.f64 (/.f64 (*.f64 (*.f64 angle angle) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (fma.f64 #s(literal -1/765275040000000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/765275040000000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/765275040000000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/765275040000000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)))) (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)))))) (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/765275040000000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal 1/765275040000000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/765275040000000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/765275040000000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/11957422500000 binary64)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (+.f64 (fma.f64 #s(literal -1/196830000 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (pow.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))))) (+.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (fma.f64 #s(literal -1/196830000 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (pow.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))))) (*.f64 (*.f64 b b) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))))))) (*.f64 b (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (fma.f64 #s(literal -1/196830000 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (pow.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))))) (*.f64 b (sqrt.f64 #s(literal 2 binary64)))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (+.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (+.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (+.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (+.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (+.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (+.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (+.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (+.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))) |
1 |
#s(literal 1 binary64) |
(+ 1 (* -1/16200 (* (pow angle 2) (pow (PI) 2)))) |
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/16200 binary64) (*.f64 angle angle)) (*.f64 (PI.f64) (PI.f64)))) |
(+ 1 (* (pow angle 2) (+ (* -1/16200 (pow (PI) 2)) (* 1/1574640000 (* (pow angle 2) (pow (PI) 4)))))) |
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/16200 binary64) (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 #s(literal 1/1574640000 binary64) (*.f64 angle angle)) (pow.f64 (PI.f64) #s(literal 4 binary64)))))) |
(+ 1 (* (pow angle 2) (+ (* -1/16200 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/382637520000000 (* (pow angle 2) (pow (PI) 6))) (* 1/1574640000 (pow (PI) 4))))))) |
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/16200 binary64) (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/382637520000000 binary64) (*.f64 (*.f64 angle angle) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1574640000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) |
(cos (* 1/90 (* angle (PI)))) |
(cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) |
(cos (* 1/90 (* angle (PI)))) |
(cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) |
(cos (* 1/90 (* angle (PI)))) |
(cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) |
(cos (* 1/90 (* angle (PI)))) |
(cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) |
(cos (* 1/90 (* angle (PI)))) |
(cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) |
(cos (* 1/90 (* angle (PI)))) |
(cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) |
(cos (* 1/90 (* angle (PI)))) |
(cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) |
(cos (* 1/90 (* angle (PI)))) |
(cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) |
(/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) |
(/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) |
(/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) |
(/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) |
(/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) |
(/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) |
(/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) |
(/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) |
(/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) |
(/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) |
(/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) |
(/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) |
(/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) |
(/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) |
(/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) |
(/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) |
(/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) |
(/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) |
(/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) |
(/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) |
(/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) |
(/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) |
(/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) |
(/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) |
(* 1/32400 (/ (* (pow a 2) (* (pow angle 2) (pow (PI) 2))) (pow x-scale 2))) |
(*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 angle angle) (*.f64 (PI.f64) (PI.f64)))) (*.f64 x-scale x-scale))) |
(* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow a 2) (* (pow angle 2) (pow (PI) 4))) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))))) |
(*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 angle angle) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) |
(* (pow angle 2) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/765275040000000 (/ (* (pow a 2) (* (pow angle 2) (pow (PI) 6))) (pow x-scale 2))))))) |
(*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal 1/765275040000000 binary64) (*.f64 (*.f64 (*.f64 a a) (*.f64 angle angle)) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (*.f64 x-scale x-scale)))))) |
(* (pow angle 2) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* (pow angle 2) (+ (* -1/347128758144000000000 (/ (* (pow a 2) (* (pow angle 2) (pow (PI) 8))) (pow x-scale 2))) (* 1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow x-scale 2))))))))) |
(*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/347128758144000000000 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 angle angle) (pow.f64 (PI.f64) #s(literal 8 binary64)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal 1/765275040000000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (*.f64 x-scale x-scale)))))))) |
(/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) |
(/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) |
(/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) |
(/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) |
(/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) |
(/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) |
(/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) |
(/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) |
(/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) |
(/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) |
(/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) |
(/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) |
(/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) |
(/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) |
(/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) |
(/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) |
(/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) |
(/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) |
(/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) |
(/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) |
(/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) |
(/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) |
(/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) |
(/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) |
(/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) |
(/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) |
(/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) |
(/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) |
(/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) |
(/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) |
(/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) |
(/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) |
(/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) |
(/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) |
(/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) |
(/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) |
(/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) |
(/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) |
(/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) |
(/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) |
(* 1/4 (* (* (sqrt 2) (sqrt 8)) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) |
(+ (* 1/8 (* (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* 1/4 (* (* (sqrt 2) (sqrt 8)) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) |
(fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) |
(+ (* 1/8 (* (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* 1/4 (* (* (sqrt 2) (sqrt 8)) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) |
(fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) |
(+ (* 1/8 (* (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* 1/4 (* (* (sqrt 2) (sqrt 8)) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) |
(fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) |
(* 1/8 (* (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) |
(*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) |
(* (pow y-scale 2) (+ (* 1/8 (* (/ (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* 1/4 (* (/ (* (sqrt 2) (sqrt 8)) (pow y-scale 2)) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) |
(*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) |
(* (pow y-scale 2) (+ (* 1/8 (* (/ (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* 1/4 (* (/ (* (sqrt 2) (sqrt 8)) (pow y-scale 2)) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) |
(*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) |
(* (pow y-scale 2) (+ (* 1/8 (* (/ (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* 1/4 (* (/ (* (sqrt 2) (sqrt 8)) (pow y-scale 2)) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) |
(*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) |
(* -1/8 (* (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) |
(*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) |
(* (pow y-scale 2) (+ (* -1/4 (* (/ (* (sqrt 2) (sqrt 8)) (pow y-scale 2)) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* -1/8 (* (/ (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) |
(*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))))) |
(* (pow y-scale 2) (+ (* -1/4 (* (/ (* (sqrt 2) (sqrt 8)) (pow y-scale 2)) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* -1/8 (* (/ (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) |
(*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))))) |
(* (pow y-scale 2) (+ (* -1/4 (* (/ (* (sqrt 2) (sqrt 8)) (pow y-scale 2)) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* -1/8 (* (/ (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) |
(*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))))) |
(+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (* 1/4 (* a (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 a (*.f64 x-scale x-scale)) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (+ (* 1/4 (* a (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* b (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))))))) (* (pow a 3) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))))) |
(fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 a (*.f64 x-scale x-scale)) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (fma.f64 a (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (/.f64 (*.f64 b (*.f64 (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64)))))) (*.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 x-scale x-scale)) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) |
(+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (+ (* 1/4 (* a (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* b (+ (* 1/4 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))))) (* (pow a 3) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (* b (+ (* 1/8 (+ (* -1/2 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow a 3) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 3))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))))) (* 1/8 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))) (* a (cos (* 1/180 (* angle (PI))))))))))))) |
(fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 a (*.f64 x-scale x-scale)) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 b (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64))))) (*.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 x-scale x-scale)) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 b (*.f64 #s(literal 1/8 binary64) (+.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 x-scale x-scale)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (*.f64 a (*.f64 x-scale x-scale)) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 a (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))))) |
(+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (+ (* 1/4 (* a (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* b (+ (* 1/4 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))))) (* (pow a 3) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (* b (+ (* 1/8 (* b (+ (* -1 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))))) (* (pow a 5) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 3))))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (pow a 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))))))) (+ (* 1/8 (+ (* -1/2 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow a 3) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 3))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))))) (* 1/8 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))) (* a (cos (* 1/180 (* angle (PI)))))))))))))) |
(fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 a (*.f64 x-scale x-scale)) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 b (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64))))) (*.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 x-scale x-scale)) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 b (fma.f64 #s(literal 1/8 binary64) (*.f64 b (+.f64 (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64))))) (*.f64 (*.f64 (pow.f64 a #s(literal 5 binary64)) (*.f64 x-scale x-scale)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a #s(literal 0 binary64))) (*.f64 a a)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (*.f64 (*.f64 a (*.f64 x-scale x-scale)) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/8 binary64) (+.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 x-scale x-scale)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (*.f64 a (*.f64 x-scale x-scale)) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 a (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))))) |
(* b (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(*.f64 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))) |
(* b (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))))))) |
(*.f64 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (fma.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 a #s(literal 0 binary64))))) (*.f64 (*.f64 b (*.f64 x-scale x-scale)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) |
(* b (+ (* 1/8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (* (pow b 2) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/8 (/ (+ (* -1/2 (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (pow b 2))) (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))))))))) |
(*.f64 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 b b) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64))))) (*.f64 y-scale y-scale)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 b b)) (*.f64 #s(literal 1/4 binary64) (fma.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 a #s(literal 0 binary64))))) (*.f64 (*.f64 b (*.f64 x-scale x-scale)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) |
(* b (+ (* 1/8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (* (pow b 2) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/8 (/ (+ (* -1 (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 a) (* 2 a))))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* 4 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (+ (* -2 a) (* 2 a)))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (pow b 3))) (+ (* 1/8 (/ (+ (* -1/2 (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (pow b 2))) (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))))))))) |
(*.f64 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 b b) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (+.f64 (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 a #s(literal 0 binary64))))) (*.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 a #s(literal 0 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 b (*.f64 b b))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64))))) (*.f64 y-scale y-scale)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 b b)) (*.f64 #s(literal 1/4 binary64) (fma.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 a #s(literal 0 binary64))))) (*.f64 (*.f64 b (*.f64 x-scale x-scale)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))))) |
(* -1 (* b (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))) |
(neg.f64 (*.f64 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))) |
(* -1 (* b (+ (* -1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))) |
(neg.f64 (*.f64 b (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 a #s(literal 0 binary64))))) (*.f64 (*.f64 b (*.f64 x-scale x-scale)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))) |
(* -1 (* b (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/8 (+ (* -1/2 (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (sin (* 1/180 (* angle (PI))))))) b)) (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) b)) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))) |
(neg.f64 (*.f64 b (+.f64 (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (+.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64))))) (*.f64 y-scale y-scale)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) b)) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 a #s(literal 0 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) b)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))) |
(* -1 (* b (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (/ (+ (* -1 (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 a) (* 2 a))))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* 4 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (+ (* -2 a) (* 2 a)))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) b)) (+ (* 1/8 (+ (* -1/2 (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (sin (* 1/180 (* angle (PI)))))))) b)) (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) b)) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))) |
(neg.f64 (*.f64 b (+.f64 (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (+.f64 (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 a #s(literal 0 binary64))))) (*.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 a #s(literal 0 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) b) (*.f64 #s(literal 1/8 binary64) (+.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64))))) (*.f64 y-scale y-scale)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) b)) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 a #s(literal 0 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) b)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))) |
(+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (pow b 2)) (pow b 2))))) (* a (pow x-scale 2)))) (* 1/4 (* a (* (sqrt 2) (sqrt 8))))) |
(fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 #s(literal 0 binary64) (*.f64 b b)))) (*.f64 a (*.f64 x-scale x-scale))) (*.f64 (*.f64 #s(literal 1/4 binary64) a) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (pow b 2)) (pow b 2))))) (* a (pow x-scale 2)))) (+ (* 1/4 (* a (* (sqrt 2) (sqrt 8)))) (* (pow angle 2) (+ (* 1/8 (+ (* -1/2 (/ (* (pow y-scale 4) (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1 (pow b 2)) (pow b 2)) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))))) (* (pow a 3) (pow x-scale 2)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))))))) (* a (pow x-scale 2))))) (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 2) (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))))) a)))))) |
(fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 #s(literal 0 binary64) (*.f64 b b)))) (*.f64 a (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))) (*.f64 (*.f64 angle angle) (*.f64 #s(literal 1/8 binary64) (+.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 #s(literal 0 binary64) (*.f64 b b))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 a (*.f64 a a)) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale)))) (*.f64 a a)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)))) (*.f64 a a))))))))) (*.f64 a (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale))))) a)))))) |
(+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (pow b 2)) (pow b 2))))) (* a (pow x-scale 2)))) (+ (* 1/4 (* a (* (sqrt 2) (sqrt 8)))) (* (pow angle 2) (+ (* 1/8 (+ (* -1/2 (/ (* (pow y-scale 4) (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1 (pow b 2)) (pow b 2)) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))))) (* (pow a 3) (pow x-scale 2)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))))))) (* a (pow x-scale 2))))) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 2) (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))))) a)) (* (pow angle 2) (+ (* 1/8 (+ (* -1/2 (/ (* a (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (+ (* 1/4 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (/ (* (pow y-scale 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (pow a 4)))) (+ (* -1 (pow b 2)) (pow b 2)))))) (pow x-scale 2))) (+ (* -1/2 (/ (* (pow y-scale 4) (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2))))))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))))) (* (pow a 3) (pow x-scale 2)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (+ (* (pow b 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 2))))) (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))))) (pow a 2)) (+ (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))) (pow a 2))) (/ (* (pow y-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))) (pow a 2))))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))) (* a (pow x-scale 2)))))) (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 2) (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 2))))))) a))))))))) |
(fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 #s(literal 0 binary64) (*.f64 b b)))) (*.f64 a (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8 binary64) (+.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 #s(literal 0 binary64) (*.f64 b b))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 a (*.f64 a a)) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale)))) (*.f64 a a)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)))) (*.f64 a a))))))))) (*.f64 a (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale))))) a)) (*.f64 (*.f64 angle angle) (*.f64 #s(literal 1/8 binary64) (+.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 a (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 (+.f64 (neg.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale))))) (pow.f64 a #s(literal 6 binary64)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale))))) (pow.f64 a #s(literal 6 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)))) (pow.f64 a #s(literal 4 binary64))))) (*.f64 #s(literal 0 binary64) (*.f64 b b))))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale)))) (*.f64 a a)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)))) (*.f64 a a)))))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 a (*.f64 a a)) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 y-scale y-scale)) #s(literal -1/787320000 binary64))))) (*.f64 a a)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)))) (*.f64 a a)) (/.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale)))) (*.f64 a a)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)))) (*.f64 a a))))) (*.f64 a a)))) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))))))) (*.f64 a (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 a a)))))) a)))))))) |
(+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (pow b 2)) (pow b 2))))) (* a (pow x-scale 2)))) (+ (* 1/4 (* a (* (sqrt 2) (sqrt 8)))) (* (pow angle 2) (+ (* 1/8 (+ (* -1/2 (/ (* (pow y-scale 4) (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1 (pow b 2)) (pow b 2)) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))))) (* (pow a 3) (pow x-scale 2)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))))))) (* a (pow x-scale 2))))) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 2) (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))))) a)) (* (pow angle 2) (+ (* 1/8 (+ (* -1/2 (/ (* a (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (+ (* 1/4 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (/ (* (pow y-scale 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (pow a 4)))) (+ (* -1 (pow b 2)) (pow b 2)))))) (pow x-scale 2))) (+ (* -1/2 (/ (* (pow y-scale 4) (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2))))))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))))) (* (pow a 3) (pow x-scale 2)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (+ (* (pow b 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 2))))) (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))))) (pow a 2)) (+ (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))) (pow a 2))) (/ (* (pow y-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))) (pow a 2))))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))) (* a (pow x-scale 2)))))) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 2) (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 2))))))) a)) (* (pow angle 2) (+ (* 1/8 (+ (* -1/2 (/ (* a (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1 (/ (* (pow y-scale 2) (* (+ (* -1 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (/ (* (pow y-scale 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (pow a 4))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2))) (+ (* -1 (/ (* (pow y-scale 6) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))) (pow a 6))) (+ (* 1/2 (/ (* (pow y-scale 2) (* (+ (* -1 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (+ (* 1/4 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (/ (* (pow y-scale 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (pow a 4)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2))) (/ (* (pow y-scale 4) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (pow a 4))))) (+ (* -1 (pow b 2)) (pow b 2)))))) (pow x-scale 2))) (+ (* -1/2 (/ (* a (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (+ (* 1/4 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (/ (* (pow y-scale 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (pow a 4)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2))))))))))) (pow x-scale 2))) (+ (* -1/2 (/ (* (pow y-scale 4) (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (+ (* (pow b 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 2))))) (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))))) (pow a 2)) (+ (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))) (pow a 2))) (/ (* (pow y-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))) (pow a 2))))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))))))) (* (pow a 3) (pow x-scale 2)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (+ (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (+ (* (pow b 2) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))))) (pow y-scale 2)))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- b a) 2)))) (pow y-scale 2))) (/ (* (pow (+ a b) 2) (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- b a) 2))) (pow y-scale 2))))))) (pow a 2)) (+ (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))))) (pow a 2))) (+ (/ (* (pow y-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (+ (* (pow b 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 2))))) (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))))) (pow a 2)) (+ (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))) (pow a 2))) (/ (* (pow y-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))) (pow a 2)))))) (pow a 2)) (/ (* (pow y-scale 2) (* (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))) (pow a 2)))))) (+ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6))))))))) (* a (pow x-scale 2))))))) (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 2) (* (sqrt 8) (- (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 2)))))) (pow a 2))))))) a)))))))))))) |
(fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 #s(literal 0 binary64) (*.f64 b b)))) (*.f64 a (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8 binary64) (+.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 #s(literal 0 binary64) (*.f64 b b))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 a (*.f64 a a)) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale)))) (*.f64 a a)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)))) (*.f64 a a))))))))) (*.f64 a (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale))))) a)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8 binary64) (+.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 a (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 (+.f64 (neg.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale))))) (pow.f64 a #s(literal 6 binary64)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale))))) (pow.f64 a #s(literal 6 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)))) (pow.f64 a #s(literal 4 binary64))))) (*.f64 #s(literal 0 binary64) (*.f64 b b))))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale)))) (*.f64 a a)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)))) (*.f64 a a)))))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 a (*.f64 a a)) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 y-scale y-scale)) #s(literal -1/787320000 binary64))))) (*.f64 a a)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)))) (*.f64 a a)) (/.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale)))) (*.f64 a a)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)))) (*.f64 a a))))) (*.f64 a a)))) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))))))) (*.f64 a (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 a a)))))) a)) (*.f64 (*.f64 angle angle) (*.f64 #s(literal 1/8 binary64) (+.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 a (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 (+.f64 (+.f64 (neg.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (+.f64 (neg.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale))))) (pow.f64 a #s(literal 6 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)))) (pow.f64 a #s(literal 4 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 a a))) (neg.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))))) (pow.f64 a #s(literal 6 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (+.f64 (neg.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale))))) (pow.f64 a #s(literal 6 binary64)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale))))) (pow.f64 a #s(literal 6 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)))) (pow.f64 a #s(literal 4 binary64))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 a a)) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (*.f64 y-scale y-scale)))) (pow.f64 a #s(literal 4 binary64))))) (*.f64 #s(literal 0 binary64) (*.f64 b b))))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (neg.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale))))) (pow.f64 a #s(literal 6 binary64)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale))))) (pow.f64 a #s(literal 6 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)))) (pow.f64 a #s(literal 4 binary64)))))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale)))) (*.f64 a a)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)))) (*.f64 a a))))))))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 y-scale y-scale)) #s(literal -1/787320000 binary64))))) (*.f64 a a)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)))) (*.f64 a a)) (/.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale)))) (*.f64 a a)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)))) (*.f64 a a))))) (*.f64 a a)))) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))))))) (*.f64 (*.f64 a (*.f64 a a)) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))) (fma.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)))) (fma.f64 (*.f64 b b) (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 4 binary64) (fma.f64 #s(literal 1/102036672000000 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))))))) (*.f64 a a)) (+.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 y-scale y-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (*.f64 y-scale y-scale))))) (*.f64 a a)) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 y-scale y-scale)) #s(literal -1/787320000 binary64))))) (*.f64 a a)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)))) (*.f64 a a)) (/.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale)))) (*.f64 a a)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)))) (*.f64 a a))))) (*.f64 a a)))))) (*.f64 a a))) (/.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale)))) (*.f64 a a)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)))) (*.f64 a a))))) (*.f64 a a)))) (fma.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))))))) (*.f64 a (*.f64 x-scale x-scale)))))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)))) (+.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 a a))))) (*.f64 a a)))))) a)))))))))) |
(+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) |
(+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) |
(+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) |
(+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) |
(+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) |
(+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) |
(+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) |
(+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) |
(+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/4 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 b (*.f64 x-scale x-scale)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (+ (* 1/4 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* a (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))))))) (* (pow b 3) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))))) |
(fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 b (*.f64 x-scale x-scale)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (fma.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (/.f64 (*.f64 (*.f64 a (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64))))) (*.f64 (*.f64 b (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) |
(+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (+ (* 1/4 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* a (+ (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))))) (* (pow b 3) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* a (+ (* 1/8 (+ (* -1/2 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow b 3) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))))) (* 1/8 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))) (* b (sin (* 1/180 (* angle (PI))))))))))))) |
(fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 b (*.f64 x-scale x-scale)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 a (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64))))) (*.f64 (*.f64 b (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 a (*.f64 #s(literal 1/8 binary64) (+.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 (*.f64 b (*.f64 b b)) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (*.f64 b (*.f64 x-scale x-scale)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 b (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))))) |
(+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (+ (* 1/4 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* a (+ (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))))) (* (pow b 3) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* a (+ (* 1/8 (* a (+ (* -1 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))))) (* (pow b 5) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (pow b 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))))))) (+ (* 1/8 (+ (* -1/2 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow b 3) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))))) (* 1/8 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))) (* b (sin (* 1/180 (* angle (PI)))))))))))))) |
(fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 b (*.f64 x-scale x-scale)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 a (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64))))) (*.f64 (*.f64 b (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 a (fma.f64 #s(literal 1/8 binary64) (*.f64 a (+.f64 (neg.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64))))) (*.f64 (*.f64 (pow.f64 b #s(literal 5 binary64)) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b #s(literal 0 binary64))) (*.f64 b b)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (*.f64 (*.f64 b (*.f64 x-scale x-scale)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/8 binary64) (+.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 (*.f64 b (*.f64 b b)) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (*.f64 b (*.f64 x-scale x-scale)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 b (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))))) |
(* a (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(*.f64 a (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))) |
(* a (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (+ (* 1/4 (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))))))) |
(*.f64 a (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (fma.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 b #s(literal 0 binary64)))))) (*.f64 (*.f64 a (*.f64 x-scale x-scale)) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) |
(* a (+ (* 1/8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (* (pow a 2) (cos (* 1/180 (* angle (PI))))))) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (+ (* 1/8 (/ (+ (* -1/2 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/4 (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))))))))) |
(*.f64 a (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 a a) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64))))) (*.f64 y-scale y-scale)))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 a a)) (*.f64 #s(literal 1/4 binary64) (fma.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 b #s(literal 0 binary64)))))) (*.f64 (*.f64 a (*.f64 x-scale x-scale)) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) |
(* a (+ (* 1/8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (* (pow a 2) (cos (* 1/180 (* angle (PI))))))) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (+ (* 1/8 (/ (+ (* -1 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 b) (* 2 b))))))) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* 4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (+ (* -2 b) (* 2 b)))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (pow a 3))) (+ (* 1/8 (/ (+ (* -1/2 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/4 (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))))))))) |
(*.f64 a (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 a a) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (+.f64 (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 b b) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 b #s(literal 0 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 b #s(literal 0 binary64)))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 x-scale x-scale) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 a (*.f64 a a))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64))))) (*.f64 y-scale y-scale)))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 a a)) (*.f64 #s(literal 1/4 binary64) (fma.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 b #s(literal 0 binary64)))))) (*.f64 (*.f64 a (*.f64 x-scale x-scale)) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))))) |
(* -1 (* a (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))) |
(neg.f64 (*.f64 a (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))) |
(* -1 (* a (+ (* -1/4 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))) |
(neg.f64 (*.f64 a (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 b #s(literal 0 binary64)))))) (*.f64 (*.f64 a (*.f64 x-scale x-scale)) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))) |
(* -1 (* a (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/8 (+ (* -1/2 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (* 1/8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (cos (* 1/180 (* angle (PI))))))) a)) (* 1/4 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) a)) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))) |
(neg.f64 (*.f64 a (+.f64 (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (+.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64))))) (*.f64 y-scale y-scale)))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) a)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 b #s(literal 0 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) a)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))) |
(* -1 (* a (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (/ (+ (* -1 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 b) (* 2 b))))))) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* 4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (+ (* -2 b) (* 2 b)))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) a)) (+ (* 1/8 (+ (* -1/2 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (* 1/8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (cos (* 1/180 (* angle (PI)))))))) a)) (* 1/4 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) a)) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))) |
(neg.f64 (*.f64 a (+.f64 (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (+.f64 (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 b b) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 b #s(literal 0 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 b #s(literal 0 binary64)))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 x-scale x-scale) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) a) (*.f64 #s(literal 1/8 binary64) (+.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64))))) (*.f64 y-scale y-scale)))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) a)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 b #s(literal 0 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) a)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))) |
(* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) |
(/ (+ (* 1/8 (* (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* (pow x-scale 2) (* y-scale (* (sqrt 2) (sqrt 8)))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow x-scale 2)) |
(/.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 y-scale (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (*.f64 x-scale x-scale)) |
(/ (+ (* 1/8 (* (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* (pow x-scale 2) (* y-scale (* (sqrt 2) (sqrt 8)))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow x-scale 2)) |
(/.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 y-scale (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (*.f64 x-scale x-scale)) |
(/ (+ (* 1/8 (* (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* (pow x-scale 2) (* y-scale (* (sqrt 2) (sqrt 8)))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow x-scale 2)) |
(/.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 y-scale (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (*.f64 x-scale x-scale)) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) |
(+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) |
(+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) |
(+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) |
(+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) |
(+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) |
(+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) |
(* 2 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) |
(*.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) |
(* 2 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) |
(*.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) |
(* 2 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) |
(*.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) |
(* 2 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) |
(*.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) |
(* 2 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) |
(*.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) |
(* 2 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) |
(*.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) |
(* 2 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) |
(*.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) |
(* 2 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) |
(*.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) |
(* 2 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) |
(*.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) |
(* 2 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) |
(*.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) |
(* 2 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) |
(*.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) |
(* 2 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) |
(*.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) |
(* 1/16200 (* (pow angle 2) (pow (PI) 2))) |
(*.f64 (*.f64 #s(literal 1/16200 binary64) (*.f64 angle angle)) (*.f64 (PI.f64) (PI.f64))) |
(* (pow angle 2) (+ (* 1/16200 (pow (PI) 2)) (* 2 (* (pow angle 2) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4))))))) |
(*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/16200 binary64) (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle angle)) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/787320000 binary64))))) |
(* (pow angle 2) (+ (* 1/16200 (pow (PI) 2)) (* (pow angle 2) (+ (* 2 (* (pow angle 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (+ (* 1/1224440064000000 (pow (PI) 6)) (+ (* 1/102036672000000 (pow (PI) 6)) (* 1/32400 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))))))) (* 2 (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))))))) |
(*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/16200 binary64) (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 angle angle) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 angle angle) (fma.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64) (fma.f64 #s(literal 1/102036672000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))))) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/787320000 binary64))))))) |
(* (pow angle 2) (+ (* 1/16200 (pow (PI) 2)) (* (pow angle 2) (+ (* 2 (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow angle 2) (+ (* 2 (* (pow angle 2) (+ (* -1/32400 (* (pow (PI) 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))) (+ (* -1/3149280000 (* (pow (PI) 4) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (+ (* -1/396718580736000000000 (pow (PI) 8)) (+ (* -1/2777030065152000000000 (pow (PI) 8)) (* 1/32400 (* (pow (PI) 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6))))))))))) (* 2 (+ (* 1/2040733440000000 (pow (PI) 6)) (+ (* 1/1224440064000000 (pow (PI) 6)) (+ (* 1/102036672000000 (pow (PI) 6)) (* 1/32400 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))))))))) |
(*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/16200 binary64) (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 2 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/787320000 binary64)) (*.f64 (*.f64 angle angle) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (fma.f64 #s(literal -1/396718580736000000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64)) (fma.f64 #s(literal -1/2777030065152000000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64)) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))))))) (fma.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64) (fma.f64 #s(literal 1/102036672000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)))))))))))) |
(* 2 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) |
(*.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) |
(* 2 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) |
(*.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) |
(* 2 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) |
(*.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) |
(* 2 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) |
(*.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) |
(* 2 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) |
(*.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) |
(* 2 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) |
(*.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) |
(* 2 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) |
(*.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) |
(* 2 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) |
(*.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) |
| 1× | batch-egg-rewrite |
| 4 722× | lower-*.f32 |
| 4 636× | lower-*.f64 |
| 4 290× | lower-/.f32 |
| 4 278× | lower-/.f64 |
| 1 912× | lower-fma.f32 |
Useful iterations: 0 (0.0ms)
| Iter | Nodes | Cost |
|---|---|---|
| 0 | 228 | 2692 |
| 0 | 318 | 2521 |
| 1 | 1441 | 2342 |
| 0 | 8621 | 2270 |
| 1× | iter limit |
| 1× | node limit |
| 1× | iter limit |
| Inputs |
|---|
(pow.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) #s(literal 2 binary64)) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (pow.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (pow.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) |
(*.f64 (*.f64 y-scale #s(literal 4 binary64)) (*.f64 b #s(literal 1/4 binary64))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 y-scale #s(literal 4 binary64)) (*.f64 b #s(literal 1/4 binary64)))) |
(*.f64 y-scale #s(literal 4 binary64)) |
(*.f64 b #s(literal 1/4 binary64)) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))) |
#s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))) |
(*.f64 b (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(/.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (*.f64 a b)) (*.f64 #s(literal 4 binary64) (*.f64 a b)))) |
(*.f64 (neg.f64 (*.f64 a b)) (*.f64 #s(literal 4 binary64) (*.f64 a b))) |
(+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) |
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) |
(/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) |
(neg.f64 (*.f64 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 x-scale #s(approx (+ (* 1/8 (/ (* (* (* y-scale (sqrt 8)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (/ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (* (+ b a) (- b a)) (* (+ b a) (- b a)))))) (* y-scale y-scale))) (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (sqrt (/ 1 (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (* x-scale x-scale))) (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (neg.f64 (*.f64 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))))) |
(*.f64 x-scale #s(approx (+ (* 1/8 (/ (* (* (* y-scale (sqrt 8)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (/ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (* (+ b a) (- b a)) (* (+ b a) (- b a)))))) (* y-scale y-scale))) (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (sqrt (/ 1 (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (* x-scale x-scale))) (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (neg.f64 (*.f64 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))))) |
(sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (pow.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a))))) |
#s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) |
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
(cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
(PI.f64) |
(*.f64 (/.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (*.f64 a b)) (*.f64 #s(literal 4 binary64) (*.f64 a b)))) #s(approx (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale))))) (*.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))))))) |
(cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) |
(/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) |
#s(approx (+ (* 1/8 (/ (* (* (* y-scale (sqrt 8)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (/ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (* (+ b a) (- b a)) (* (+ b a) (- b a)))))) (* y-scale y-scale))) (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (sqrt (/ 1 (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (* x-scale x-scale))) (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (neg.f64 (*.f64 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))) |
(*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) |
| Outputs |
|---|
(exp.f64 (*.f64 (log.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64))) #s(literal 2 binary64))) |
(pow.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) #s(literal 2 binary64)) |
(pow.f64 (*.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64))) #s(literal 1 binary64)) |
(pow.f64 (exp.f64 (log.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)))) #s(literal 2 binary64)) |
(*.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64))) |
(*.f64 (exp.f64 (log.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)))) (exp.f64 (log.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 a a) (*.f64 (*.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64))) (*.f64 b b))))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 a a) (*.f64 (*.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64))) (*.f64 b b))))))) |
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 a a) (*.f64 (*.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64))) (*.f64 b b)))))) |
(*.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 a a) (*.f64 (*.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64))) (*.f64 b b))))) (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (sqrt.f64 #s(literal 8 binary64)))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) |
(*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) #s(literal 1/4 binary64)) |
(*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (sqrt.f64 #s(literal 8 binary64))) |
(*.f64 y-scale (*.f64 #s(literal 4 binary64) (*.f64 b #s(literal 1/4 binary64)))) |
(*.f64 (*.f64 #s(literal 4 binary64) y-scale) (*.f64 b #s(literal 1/4 binary64))) |
(*.f64 (*.f64 b #s(literal 1/4 binary64)) (*.f64 #s(literal 4 binary64) y-scale)) |
(*.f64 (*.f64 (*.f64 #s(literal 4 binary64) y-scale) b) #s(literal 1/4 binary64)) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 4 binary64) y-scale) (*.f64 b #s(literal 1/4 binary64)))) |
(*.f64 #s(literal 4 binary64) y-scale) |
(*.f64 y-scale #s(literal 4 binary64)) |
(*.f64 b #s(literal 1/4 binary64)) |
(*.f64 #s(literal 1/4 binary64) b) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b y-scale) (*.f64 #s(literal 4 binary64) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) |
#s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b y-scale) (*.f64 #s(literal 4 binary64) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b y-scale) (*.f64 #s(literal 4 binary64) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) |
(*.f64 (*.f64 b #s(literal 1/4 binary64)) (*.f64 y-scale (*.f64 #s(literal 4 binary64) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) |
(*.f64 (*.f64 (*.f64 b y-scale) (*.f64 #s(literal 4 binary64) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) #s(literal 1/4 binary64)) |
(*.f64 b (*.f64 y-scale (*.f64 #s(literal 4 binary64) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) |
(*.f64 (*.f64 y-scale (*.f64 #s(literal 4 binary64) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) b) |
(*.f64 (*.f64 b y-scale) (*.f64 #s(literal 4 binary64) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) |
(neg.f64 (/.f64 #s(literal -1 binary64) (*.f64 (*.f64 b a) (*.f64 #s(literal 4 binary64) (*.f64 b a))))) |
(/.f64 #s(literal 1 binary64) (*.f64 (*.f64 b a) (*.f64 #s(literal 4 binary64) (*.f64 b a)))) |
(/.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (*.f64 (*.f64 b a) (*.f64 #s(literal 4 binary64) (*.f64 b a)))) #s(literal -1 binary64))) |
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 (*.f64 (*.f64 b a) (*.f64 #s(literal 4 binary64) (*.f64 b a)))) #s(literal -1 binary64)) #s(literal 1 binary64))) |
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 b a)) (/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 b a))))) |
(/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 (*.f64 b a) (*.f64 #s(literal 4 binary64) (*.f64 b a))))) |
(/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 (neg.f64 (*.f64 (*.f64 b a) (*.f64 #s(literal 4 binary64) (*.f64 b a)))) #s(literal -1 binary64)))) |
(/.f64 (/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 b a))) (*.f64 #s(literal 4 binary64) (*.f64 b a))) |
(/.f64 (neg.f64 (/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 b a)))) (neg.f64 (*.f64 #s(literal 4 binary64) (*.f64 b a)))) |
(pow.f64 (*.f64 (*.f64 b a) (*.f64 #s(literal 4 binary64) (*.f64 b a))) #s(literal -1 binary64)) |
(pow.f64 (*.f64 (neg.f64 (*.f64 (*.f64 b a) (*.f64 #s(literal 4 binary64) (*.f64 b a)))) #s(literal -1 binary64)) #s(literal -1 binary64)) |
(*.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 b a) (*.f64 #s(literal 4 binary64) (*.f64 b a))))) |
(*.f64 #s(literal -1 binary64) (/.f64 #s(literal -1 binary64) (*.f64 (*.f64 b a) (*.f64 #s(literal 4 binary64) (*.f64 b a))))) |
(*.f64 (/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 b a))) (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (*.f64 b a)))) |
(-.f64 #s(literal 0 binary64) (*.f64 (*.f64 b a) (*.f64 #s(literal 4 binary64) (*.f64 b a)))) |
(neg.f64 (*.f64 (*.f64 b a) (*.f64 #s(literal 4 binary64) (*.f64 b a)))) |
(*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (neg.f64 (*.f64 b a)))) |
(*.f64 (*.f64 (*.f64 b a) (neg.f64 (*.f64 b a))) #s(literal 4 binary64)) |
(*.f64 #s(literal -1 binary64) (*.f64 (*.f64 b a) (*.f64 #s(literal 4 binary64) (*.f64 b a)))) |
(*.f64 (neg.f64 (*.f64 b a)) (*.f64 #s(literal 4 binary64) (*.f64 b a))) |
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 b a)) (neg.f64 (*.f64 b a))) |
(*.f64 (*.f64 (neg.f64 (*.f64 b a)) #s(literal 4 binary64)) (*.f64 b a)) |
(+.f64 (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale))) |
(+.f64 (/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale))) |
(-.f64 (/.f64 (pow.f64 (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) (/.f64 (-.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale))) (/.f64 (pow.f64 (/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) (/.f64 (-.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale)))) |
(fma.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale))) |
(fma.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale))) |
(fma.f64 (*.f64 b b) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale))) |
(fma.f64 (*.f64 a a) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale))) |
(fma.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale))) |
(fma.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale))) |
(fma.f64 (neg.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale))) |
(fma.f64 (neg.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale))) |
(fma.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) x-scale) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale))) |
(fma.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) x-scale) (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale))) |
(fma.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) x-scale) (/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale))) |
(fma.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) x-scale) (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale))) |
(fma.f64 (/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) x-scale) (/.f64 #s(literal 1 binary64) x-scale) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale))) |
(fma.f64 (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) x-scale) (/.f64 #s(literal 1 binary64) x-scale) (/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale))) |
(fma.f64 (/.f64 a x-scale) (/.f64 (*.f64 a (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) x-scale) (/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale))) |
(fma.f64 (/.f64 b x-scale) (/.f64 (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) x-scale) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale))) |
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale x-scale)) (fma.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))) |
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale x-scale))))) (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale)) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale)) #s(literal 3 binary64))))) |
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (-.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale)) (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))))) |
(/.f64 (fma.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale x-scale))) |
(/.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale)) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale)) #s(literal 3 binary64))) (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale x-scale)))))) |
(/.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (/.f64 (-.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale))) |
(/.f64 (fma.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 (/.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) #s(literal 1 binary64))) (*.f64 (/.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (/.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) |
(/.f64 (fma.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale) (*.f64 (/.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 (/.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale))) |
(/.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 (*.f64 x-scale x-scale)) (*.f64 (/.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (neg.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 (/.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (neg.f64 (*.f64 x-scale x-scale)))) |
(/.f64 (fma.f64 #s(literal 1 binary64) x-scale (*.f64 (/.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) x-scale))) (*.f64 (/.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) x-scale)) |
(/.f64 (fma.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (/.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) #s(literal 1 binary64))) (*.f64 (*.f64 x-scale x-scale) (/.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) |
(/.f64 (fma.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (neg.f64 (*.f64 x-scale x-scale)) (*.f64 (*.f64 x-scale x-scale) (neg.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (neg.f64 (*.f64 x-scale x-scale)))) |
(/.f64 (fma.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) x-scale (*.f64 (*.f64 x-scale x-scale) (/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) x-scale))) (*.f64 (*.f64 x-scale x-scale) x-scale)) |
(/.f64 (fma.f64 (neg.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (/.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 (neg.f64 (*.f64 x-scale x-scale)) #s(literal 1 binary64))) (*.f64 (neg.f64 (*.f64 x-scale x-scale)) (/.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) |
(/.f64 (fma.f64 (neg.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale) (*.f64 (neg.f64 (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 (neg.f64 (*.f64 x-scale x-scale)) (*.f64 x-scale x-scale))) |
(/.f64 (fma.f64 (neg.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (neg.f64 (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 x-scale x-scale)) (neg.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 (neg.f64 (*.f64 x-scale x-scale)) (neg.f64 (*.f64 x-scale x-scale)))) |
(/.f64 (fma.f64 (neg.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) x-scale (*.f64 (neg.f64 (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) x-scale))) (*.f64 (neg.f64 (*.f64 x-scale x-scale)) x-scale)) |
(/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) x-scale) (/.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 x-scale #s(literal 1 binary64))) (*.f64 x-scale (/.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) |
(/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) x-scale) (*.f64 x-scale x-scale) (*.f64 x-scale (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 x-scale x-scale))) |
(/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) x-scale) (neg.f64 (*.f64 x-scale x-scale)) (*.f64 x-scale (neg.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (neg.f64 (*.f64 x-scale x-scale)))) |
(/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) x-scale) x-scale (*.f64 x-scale (/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) x-scale))) (*.f64 x-scale x-scale)) |
(/.f64 (fma.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 (/.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) #s(literal 1 binary64))) (*.f64 (/.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (/.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) |
(/.f64 (fma.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale) (*.f64 (/.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 (/.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale))) |
(/.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 (*.f64 x-scale x-scale)) (*.f64 (/.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (neg.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 (/.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (neg.f64 (*.f64 x-scale x-scale)))) |
(/.f64 (fma.f64 #s(literal 1 binary64) x-scale (*.f64 (/.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) x-scale))) (*.f64 (/.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) x-scale)) |
(/.f64 (fma.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (/.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) #s(literal 1 binary64))) (*.f64 (*.f64 x-scale x-scale) (/.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) |
(/.f64 (fma.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale x-scale))) |
(/.f64 (fma.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (neg.f64 (*.f64 x-scale x-scale)) (*.f64 (*.f64 x-scale x-scale) (neg.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (neg.f64 (*.f64 x-scale x-scale)))) |
(/.f64 (fma.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) x-scale (*.f64 (*.f64 x-scale x-scale) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) x-scale))) (*.f64 (*.f64 x-scale x-scale) x-scale)) |
(/.f64 (fma.f64 (neg.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (/.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 (neg.f64 (*.f64 x-scale x-scale)) #s(literal 1 binary64))) (*.f64 (neg.f64 (*.f64 x-scale x-scale)) (/.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) |
(/.f64 (fma.f64 (neg.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale) (*.f64 (neg.f64 (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 (neg.f64 (*.f64 x-scale x-scale)) (*.f64 x-scale x-scale))) |
(/.f64 (fma.f64 (neg.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (neg.f64 (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 x-scale x-scale)) (neg.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 (neg.f64 (*.f64 x-scale x-scale)) (neg.f64 (*.f64 x-scale x-scale)))) |
(/.f64 (fma.f64 (neg.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) x-scale (*.f64 (neg.f64 (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) x-scale))) (*.f64 (neg.f64 (*.f64 x-scale x-scale)) x-scale)) |
(/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) x-scale) (/.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 x-scale #s(literal 1 binary64))) (*.f64 x-scale (/.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) |
(/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) x-scale) (*.f64 x-scale x-scale) (*.f64 x-scale (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 x-scale x-scale))) |
(/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) x-scale) (neg.f64 (*.f64 x-scale x-scale)) (*.f64 x-scale (neg.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (neg.f64 (*.f64 x-scale x-scale)))) |
(/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) x-scale) x-scale (*.f64 x-scale (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) x-scale))) (*.f64 x-scale x-scale)) |
(/.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (neg.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale x-scale)))) |
(/.f64 (neg.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale)) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale)) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale x-scale))))))) |
(/.f64 (neg.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64)))) (neg.f64 (/.f64 (-.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale)))) |
(/.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale)) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale)) #s(literal 3 binary64))) (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale)))))) |
(/.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale)))) |
(*.f64 (fma.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale x-scale)))) |
(*.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale)) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale x-scale))))))) |
(*.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale)))) |
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) |
(+.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) |
(-.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (/.f64 (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) |
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) |
(fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) |
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1/4 binary64) (-.f64 (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 3 binary64))))) |
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (-.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 2 binary64))))) |
(/.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 3 binary64))) (+.f64 #s(literal 1/4 binary64) (-.f64 (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))) |
(/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) |
(/.f64 (neg.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 3 binary64)))) (neg.f64 (+.f64 #s(literal 1/4 binary64) (-.f64 (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))))) |
(/.f64 (neg.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 2 binary64)))) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) |
(/.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (+.f64 (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))))) |
(/.f64 (-.f64 (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 2 binary64)) #s(literal 1/4 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) |
(*.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/4 binary64) (-.f64 (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))))) |
(*.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) |
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 y-scale y-scale) (*.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))) |
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 y-scale y-scale) (*.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))) #s(literal 1 binary64))) |
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 y-scale y-scale) (*.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))))) |
(/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) |
(/.f64 (neg.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))) (neg.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) |
(/.f64 (neg.f64 (neg.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))) (neg.f64 (neg.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) |
(pow.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 y-scale y-scale) (*.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))) #s(literal -1 binary64)) |
(*.f64 #s(literal 1 binary64) (*.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) |
(*.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) |
(*.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) |
(*.f64 (neg.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) |
(*.f64 (/.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 y-scale (*.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) |
(*.f64 (/.f64 (*.f64 y-scale y-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) |
(*.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 y-scale y-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) |
(*.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 #s(literal 2 binary64) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) |
(+.f64 #s(literal 0 binary64) (*.f64 (neg.f64 b) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 4 binary64) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) |
(-.f64 #s(literal 0 binary64) (*.f64 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 4 binary64) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) |
(neg.f64 (*.f64 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 4 binary64) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) |
(/.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 4 binary64) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal 3 binary64))) (+.f64 #s(literal 0 binary64) (fma.f64 (*.f64 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 4 binary64) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 4 binary64) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 0 binary64) (*.f64 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 4 binary64) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) |
(/.f64 (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 4 binary64) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 4 binary64) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (+.f64 #s(literal 0 binary64) (*.f64 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 4 binary64) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) |
(*.f64 b (neg.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 4 binary64) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) |
(*.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 4 binary64) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) |
(*.f64 (neg.f64 b) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 4 binary64) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 x-scale #s(approx (+ (* 1/8 (/ (* (* (* y-scale (sqrt 8)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (/ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (* (+ b a) (- b a)) (* (+ b a) (- b a)))))) (* y-scale y-scale))) (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (sqrt (/ 1 (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (* x-scale x-scale))) (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (*.f64 (neg.f64 b) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 4 binary64) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) |
(*.f64 x-scale #s(approx (+ (* 1/8 (/ (* (* (* y-scale (sqrt 8)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (/ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (* (+ b a) (- b a)) (* (+ b a) (- b a)))))) (* y-scale y-scale))) (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (sqrt (/ 1 (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (* x-scale x-scale))) (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (*.f64 (neg.f64 b) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 4 binary64) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) |
(*.f64 #s(approx (+ (* 1/8 (/ (* (* (* y-scale (sqrt 8)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (/ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (* (+ b a) (- b a)) (* (+ b a) (- b a)))))) (* y-scale y-scale))) (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (sqrt (/ 1 (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (* x-scale x-scale))) (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (*.f64 (neg.f64 b) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 4 binary64) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) x-scale) |
(exp.f64 (*.f64 (log.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 a a) (*.f64 (*.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64))) (*.f64 b b))))) #s(literal 1/2 binary64))) |
(sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 a a) (*.f64 (*.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64))) (*.f64 b b))))) |
(pow.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 a a) (*.f64 (*.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64))) (*.f64 b b)))) #s(literal 1/2 binary64)) |
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 a a) (*.f64 (*.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64))) (*.f64 b b))))) |
(*.f64 (sqrt.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 a a) (*.f64 (*.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64))) (*.f64 b b)))) (sqrt.f64 #s(literal 2 binary64))) |
(exp.f64 (*.f64 (log.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64))) #s(literal 1 binary64))) |
#s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) |
(pow.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) #s(literal 1 binary64)) |
(exp.f64 (*.f64 (log.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1 binary64))) |
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
(pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 1 binary64)) |
(exp.f64 (*.f64 (log.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1 binary64))) |
(cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
(pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 1 binary64)) |
(PI.f64) |
(log.f64 (exp.f64 (PI.f64))) |
(exp.f64 (log.f64 (PI.f64))) |
(exp.f64 (*.f64 (log.f64 (PI.f64)) #s(literal 1 binary64))) |
(sqrt.f64 (*.f64 (PI.f64) (PI.f64))) |
(cbrt.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64))) |
(pow.f64 (PI.f64) #s(literal 1 binary64)) |
(pow.f64 (cbrt.f64 (PI.f64)) #s(literal 3 binary64)) |
(pow.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) #s(literal 1/3 binary64)) |
(pow.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) |
(*.f64 #s(literal 1 binary64) (PI.f64)) |
(*.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) (cbrt.f64 (PI.f64))) |
(*.f64 (sqrt.f64 (PI.f64)) (sqrt.f64 (PI.f64))) |
(*.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) #s(literal 1 binary64)) (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 1 binary64))) |
(*.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 1 binary64))) |
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (*.f64 (*.f64 b a) (*.f64 #s(literal 4 binary64) (*.f64 b a)))) (neg.f64 #s(approx (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale))))) (*.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale)))))))))) |
(/.f64 #s(approx (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale))))) (*.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 b a) (*.f64 #s(literal 4 binary64) (*.f64 b a)))) |
(/.f64 #s(approx (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale))))) (*.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 (neg.f64 (*.f64 (*.f64 b a) (*.f64 #s(literal 4 binary64) (*.f64 b a)))) #s(literal -1 binary64))) |
(/.f64 (neg.f64 #s(approx (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale))))) (*.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale)))))))) (neg.f64 (*.f64 (*.f64 b a) (*.f64 #s(literal 4 binary64) (*.f64 b a))))) |
(/.f64 (neg.f64 (neg.f64 #s(approx (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale))))) (*.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale))))))))) (*.f64 (*.f64 b a) (*.f64 #s(literal 4 binary64) (*.f64 b a)))) |
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 b a) (*.f64 #s(literal 4 binary64) (*.f64 b a)))) #s(approx (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale))))) (*.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale)))))))) |
(*.f64 #s(approx (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale))))) (*.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale))))))) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 b a) (*.f64 #s(literal 4 binary64) (*.f64 b a))))) |
(*.f64 (neg.f64 #s(approx (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale))))) (*.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale)))))))) (/.f64 #s(literal -1 binary64) (*.f64 (*.f64 b a) (*.f64 #s(literal 4 binary64) (*.f64 b a))))) |
(*.f64 (/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 b a))) (/.f64 #s(approx (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale))))) (*.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 #s(literal 4 binary64) (*.f64 b a)))) |
(*.f64 #s(literal -1/4 binary64) (/.f64 #s(approx (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale))))) (*.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 b a) (neg.f64 (*.f64 b a))))) |
(*.f64 (/.f64 #s(literal -1 binary64) (*.f64 (*.f64 b a) (neg.f64 (*.f64 b a)))) (/.f64 #s(approx (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale))))) (*.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale))))))) #s(literal 4 binary64))) |
(*.f64 (/.f64 #s(literal -1 binary64) (*.f64 #s(literal 4 binary64) (*.f64 b a))) (/.f64 #s(approx (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale))))) (*.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale))))))) (neg.f64 (*.f64 b a)))) |
(*.f64 (/.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (*.f64 b a)) #s(literal 4 binary64))) (/.f64 #s(approx (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale))))) (*.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 b a))) |
(cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) |
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) |
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) #s(literal 1 binary64))) |
(/.f64 #s(literal 1 binary64) (/.f64 x-scale (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) x-scale))) |
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) |
(/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale)) |
(/.f64 (neg.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (neg.f64 (*.f64 x-scale x-scale))) |
(/.f64 (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) x-scale) x-scale) |
(/.f64 (neg.f64 (neg.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (neg.f64 (neg.f64 (*.f64 x-scale x-scale)))) |
(/.f64 (neg.f64 (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) x-scale)) (neg.f64 x-scale)) |
(pow.f64 (/.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)) |
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale))) |
(*.f64 (*.f64 a a) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 x-scale x-scale))) |
(*.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) |
(*.f64 (neg.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 x-scale x-scale)))) |
(*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) x-scale)) |
(*.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) x-scale) (/.f64 (*.f64 a a) x-scale)) |
(*.f64 (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) x-scale) (/.f64 #s(literal 1 binary64) x-scale)) |
(*.f64 (/.f64 a x-scale) (/.f64 (*.f64 a (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) x-scale)) |
#s(approx (+ (* 1/8 (/ (* (* (* y-scale (sqrt 8)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (/ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (* (+ b a) (- b a)) (* (+ b a) (- b a)))))) (* y-scale y-scale))) (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (sqrt (/ 1 (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (* x-scale x-scale))) (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (*.f64 (neg.f64 b) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 4 binary64) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) |
(*.f64 y-scale (*.f64 y-scale (*.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))) |
(*.f64 (*.f64 y-scale y-scale) (*.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))) |
(*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (*.f64 y-scale y-scale)) |
(*.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) |
Compiled 320 525 to 6 051 computations (98.1% saved)
69 alts after pruning (67 fresh and 2 done)
| Pruned | Kept | Total | |
|---|---|---|---|
| New | 1 407 | 38 | 1 445 |
| Fresh | 12 | 29 | 41 |
| Picked | 4 | 1 | 5 |
| Done | 0 | 1 | 1 |
| Total | 1 423 | 69 | 1 492 |
| Status | Accuracy | Program |
|---|---|---|
| 2.6% | (/.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 b a) b) a)) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (+.f64 (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale y-scale))))))) (neg.f64 (/.f64 #s(literal -1 binary64) (*.f64 b a)))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (*.f64 #s(literal 4 binary64) (*.f64 b a)))) | |
| 2.8% | (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (exp.f64 (*.f64 (log.f64 (*.f64 x-scale y-scale)) #s(literal 2 binary64))))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) | |
| 4.5% | (/.f64 #s(approx (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale))))) (*.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 b a) (*.f64 #s(literal 4 binary64) (*.f64 b a)))) | |
| 1.2% | (*.f64 (/.f64 (sqrt.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 b (neg.f64 a)) (*.f64 #s(literal 4 binary64) (*.f64 b a))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (neg.f64 (*.f64 (*.f64 (*.f64 b a) b) a)))) (+.f64 (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 b a) (*.f64 #s(literal 4 binary64) (*.f64 b a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) | |
| 2.6% | (*.f64 (/.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (*.f64 a b)) (*.f64 #s(literal 4 binary64) (*.f64 a b)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))) (*.f64 #s(literal 8 binary64) (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (* angle (PI)) 1/180))) #s(literal 1 binary64)))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale))))))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))) | |
| 0.4% | (*.f64 (/.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (*.f64 a b)) (*.f64 #s(literal 4 binary64) (*.f64 a b)))) (/.f64 (sqrt.f64 (*.f64 #s(approx (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (*.f64 #s(literal 8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale))))))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))) | |
| 9.2% | (*.f64 (/.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (*.f64 a b)) (*.f64 #s(literal 4 binary64) (*.f64 a b)))) #s(approx (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale))))) (*.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))))) | |
| 3.6% | (*.f64 (/.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (*.f64 a b)) (*.f64 #s(literal 4 binary64) (*.f64 a b)))) #s(approx (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale))))) (*.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (*.f64 (sqrt.f64 (PI.f64)) (sqrt.f64 (PI.f64))))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))))))) | |
| 1.9% | (*.f64 (/.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (*.f64 a b)) (*.f64 #s(literal 4 binary64) (*.f64 a b)))) #s(approx (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale))))) (*.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (+ (/ (* (* a a) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale x-scale)) (/ (* (* b b) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale x-scale))) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))))))) | |
| 1.9% | (*.f64 (/.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (*.f64 a b)) (*.f64 #s(literal 4 binary64) (*.f64 a b)))) #s(approx (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale))))) (*.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (+ (/ (* (* a a) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale x-scale)) (/ (* (* b b) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale x-scale))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)))))))))) | |
| 7.8% | (*.f64 (/.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (*.f64 a b)) (*.f64 #s(literal 4 binary64) (*.f64 a b)))) #s(approx (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale))))) (*.f64 (*.f64 a a) (*.f64 (*.f64 b (*.f64 b b)) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))) | |
| 2.6% | (*.f64 (*.f64 (neg.f64 (/.f64 #s(literal -1 binary64) (*.f64 b a))) (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (*.f64 b a)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))) (*.f64 #s(literal 8 binary64) (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale))))))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))) | |
| 1.7% | (*.f64 #s(literal -1/4 binary64) (/.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 b a) b) a)) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (+.f64 (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale y-scale))))))) (/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 b a) b) a)) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))) | |
| 2.6% | (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 (neg.f64 (*.f64 a b)) (*.f64 #s(literal 4 binary64) (*.f64 a b))) (*.f64 (neg.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))) (*.f64 #s(literal 8 binary64) (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)))))))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))) #s(literal -1 binary64))) | |
| 4.2% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (fma.f64 #s(literal 1/4 binary64) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 #s(literal 1/8 binary64) (fma.f64 y-scale (*.f64 (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))))))))) | |
| 37.4% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 (*.f64 b #s(literal 1/4 binary64)) (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 8 binary64)))) | |
| 35.3% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 a a) (*.f64 (*.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64))) (*.f64 b b))))))) | |
| 16.3% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) | |
| 19.2% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) | |
| 43.1% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (pow.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (*.f64 (sqrt.f64 (PI.f64)) (sqrt.f64 (PI.f64)))))) #s(literal 2 binary64)) (*.f64 a a))))))) | |
| 43.1% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (pow.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (cbrt.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)))))) #s(literal 2 binary64)) (*.f64 a a))))))) | |
| 40.3% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (pow.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 #s(approx (sin (* 1/180 (* angle (PI)))) (*.f64 angle (fma.f64 (*.f64 #s(literal -1/34992000 binary64) (*.f64 angle angle)) (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/180 binary64) (PI.f64))))) #s(literal 2 binary64)) (*.f64 a a))))))) | |
| ▶ | 43.1% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 #s(approx (pow (cos (* 1/180 (* angle (PI)))) 2) #s(literal 1 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a))))))) |
| 34.6% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (exp.f64 (*.f64 (log.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 a a) (*.f64 (*.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64))) (*.f64 b b))))) #s(literal 1/2 binary64))))) | |
| 34.3% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (exp.f64 (*.f64 (log.f64 (*.f64 #s(literal 2 binary64) (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))))) #s(literal 1/2 binary64))))) | |
| 26.0% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) #s(approx (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 angle angle) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))))) b) (*.f64 b (sqrt.f64 #s(literal 2 binary64))))))) | |
| 19.3% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) #s(approx (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))) | |
| 26.0% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) #s(approx (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 angle angle) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))))))) b) (*.f64 b (sqrt.f64 #s(literal 2 binary64))))))) | |
| 37.4% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) #s(approx (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (*.f64 b (sqrt.f64 #s(literal 2 binary64)))))) | |
| 12.5% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) #s(approx (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))) | |
| 5.7% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) #s(approx (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (neg.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))) | |
| 9.6% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) #s(approx (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (neg.f64 (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))) | |
| 5.9% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (fma.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 a #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))))))) | |
| 40.7% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b))))))) | |
| ✓ | 37.4% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))) |
| 37.6% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 (*.f64 y-scale (exp.f64 (*.f64 (log.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 8 binary64))))) | |
| 37.3% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) b) #s(approx (* (* y-scale (sqrt 2)) (sqrt 8)) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))) | |
| ▶ | 2.7% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(approx (+ (* 1/8 (/ (* (* (* y-scale (sqrt 8)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (/ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (* (+ b a) (- b a)) (* (+ b a) (- b a)))))) (* y-scale y-scale))) (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (sqrt (/ 1 (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (* x-scale x-scale))) (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (*.f64 (neg.f64 b) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 4 binary64) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) x-scale)) |
| 20.9% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 x-scale #s(approx (+ (* 1/8 (/ (* (* (* y-scale (sqrt 8)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (/ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (* (+ b a) (- b a)) (* (+ b a) (- b a)))))) (* y-scale y-scale))) (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (sqrt (/ 1 (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (* x-scale x-scale))) (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 #s(literal 0 binary64) (*.f64 b b)))) (*.f64 a (*.f64 x-scale x-scale))) (*.f64 (*.f64 #s(literal 1/4 binary64) a) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))) | |
| 21.3% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 x-scale #s(approx (+ (* 1/8 (/ (* (* (* y-scale (sqrt 8)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (/ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (* (+ b a) (- b a)) (* (+ b a) (- b a)))))) (* y-scale y-scale))) (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (sqrt (/ 1 (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (* x-scale x-scale))) (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) | |
| 5.9% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 x-scale #s(approx (+ (* 1/8 (/ (* (* (* y-scale (sqrt 8)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (/ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (* (+ b a) (- b a)) (* (+ b a) (- b a)))))) (* y-scale y-scale))) (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (sqrt (/ 1 (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (* x-scale x-scale))) (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (neg.f64 (*.f64 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (*.f64 (sqrt.f64 (PI.f64)) (sqrt.f64 (PI.f64)))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))))) | |
| 5.3% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 x-scale #s(approx (+ (* 1/8 (/ (* (* (* y-scale (sqrt 8)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (/ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (* (+ b a) (- b a)) (* (+ b a) (- b a)))))) (* y-scale y-scale))) (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (sqrt (/ 1 (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (* x-scale x-scale))) (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (neg.f64 (*.f64 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (cbrt.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))))) | |
| 9.7% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 x-scale #s(approx (+ (* 1/8 (/ (* (* (* y-scale (sqrt 8)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (/ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (* (+ b a) (- b a)) (* (+ b a) (- b a)))))) (* y-scale y-scale))) (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (sqrt (/ 1 (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (* x-scale x-scale))) (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (neg.f64 (*.f64 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) #s(approx (/ (* (* y-scale y-scale) (* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* y-scale y-scale)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (+.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/16200 binary64) (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 angle angle) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 angle angle) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))))))))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))))) | |
| 10.3% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 x-scale #s(approx (+ (* 1/8 (/ (* (* (* y-scale (sqrt 8)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (/ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (* (+ b a) (- b a)) (* (+ b a) (- b a)))))) (* y-scale y-scale))) (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (sqrt (/ 1 (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (* x-scale x-scale))) (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) #s(approx (neg (* b (+ (* 1/8 (/ (* (* y-scale y-scale) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (* y-scale y-scale) (* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* y-scale y-scale)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (* x-scale x-scale) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 b (*.f64 (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 b (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))))) | |
| 4.6% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 x-scale #s(approx (+ (* 1/8 (/ (* (* (* y-scale (sqrt 8)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (/ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (* (+ b a) (- b a)) (* (+ b a) (- b a)))))) (* y-scale y-scale))) (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (sqrt (/ 1 (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (* x-scale x-scale))) (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) #s(approx (neg (* b (+ (* 1/8 (/ (* (* y-scale y-scale) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (* y-scale y-scale) (* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* y-scale y-scale)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (* x-scale x-scale) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))) (/.f64 (+.f64 (neg.f64 (*.f64 (*.f64 (*.f64 angle angle) b) (fma.f64 #s(literal 1/720 binary64) (*.f64 (*.f64 (PI.f64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (PI.f64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 x-scale x-scale)) #s(literal -1/216 binary64)))))) (*.f64 #s(literal -45 binary64) (/.f64 (*.f64 (*.f64 b (*.f64 y-scale y-scale)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (*.f64 x-scale x-scale) (PI.f64))))) angle))))) | |
| 7.9% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 x-scale #s(approx (+ (* 1/8 (/ (* (* (* y-scale (sqrt 8)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (/ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (* (+ b a) (- b a)) (* (+ b a) (- b a)))))) (* y-scale y-scale))) (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (sqrt (/ 1 (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (* x-scale x-scale))) (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) #s(approx (neg (* b (+ (* 1/8 (/ (* (* y-scale y-scale) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (* y-scale y-scale) (* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* y-scale y-scale)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (* x-scale x-scale) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))) (/.f64 (*.f64 #s(literal -45 binary64) (*.f64 (*.f64 b (*.f64 y-scale y-scale)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 angle (*.f64 (*.f64 x-scale x-scale) (PI.f64)))))))) | |
| 9.2% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 x-scale #s(approx (+ (* 1/8 (/ (* (* (* y-scale (sqrt 8)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (/ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (* (+ b a) (- b a)) (* (+ b a) (- b a)))))) (* y-scale y-scale))) (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (sqrt (/ 1 (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (* x-scale x-scale))) (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) #s(approx (neg (* b (+ (* 1/8 (/ (* (* y-scale y-scale) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (* y-scale y-scale) (* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* y-scale y-scale)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (* x-scale x-scale) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 b (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))) | |
| 12.5% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 x-scale #s(approx (+ (* 1/8 (/ (* (* (* y-scale (sqrt 8)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (/ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (* (+ b a) (- b a)) (* (+ b a) (- b a)))))) (* y-scale y-scale))) (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (sqrt (/ 1 (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (* x-scale x-scale))) (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) #s(approx (neg (* b (+ (* 1/8 (/ (* (* y-scale y-scale) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (* y-scale y-scale) (* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* y-scale y-scale)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (* x-scale x-scale) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))) (neg.f64 (*.f64 b (*.f64 #s(literal 1/4 binary64) (fma.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))))) | |
| ▶ | 37.6% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* y-scale 4) (* b 1/4)) (*.f64 b y-scale))) |
| 23.2% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 angle angle) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))))))))) b) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))) | |
| 35.1% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 (*.f64 (*.f64 b y-scale) (*.f64 #s(literal 4 binary64) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) #s(literal 1/4 binary64)))) | |
| ▶ | 13.3% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))) |
| 34.6% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (*.f64 (sqrt.f64 (PI.f64)) (sqrt.f64 (PI.f64)))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))) | |
| 34.6% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (cbrt.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))) | |
| ✓ | 34.8% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))) |
| 39.1% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 #s(approx (cos (* 1/180 (* angle (PI)))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/64800 binary64) (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 #s(literal 1/25194240000 binary64) (*.f64 angle angle)) (pow.f64 (PI.f64) #s(literal 4 binary64))))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))) | |
| 12.5% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 a (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))) | |
| 25.6% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 #s(literal 1/4 binary64) #s(approx (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (fma.f64 b (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/64800 binary64) (*.f64 b (*.f64 (*.f64 y-scale (*.f64 (PI.f64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 #s(literal 1/25194240000 binary64) (*.f64 (*.f64 (*.f64 angle angle) b) (*.f64 (*.f64 y-scale (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))))))) | |
| 37.3% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 #s(literal 1/4 binary64) #s(approx (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (*.f64 (*.f64 b y-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))) | |
| 12.5% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 a y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))) | |
| 5.7% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))) | |
| 9.6% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 a (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))) | |
| 4.6% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* x-scale (+ (* 1/8 (/ (* (* (* y-scale (sqrt 8)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (/ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (* (+ b a) (- b a)) (* (+ b a) (- b a)))))) (* y-scale y-scale))) (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (sqrt (/ 1 (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (* x-scale x-scale))) (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale)))))))) (*.f64 (*.f64 b x-scale) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))) | |
| 40.6% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* x-scale (+ (* 1/8 (/ (* (* (* y-scale (sqrt 8)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (/ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (* (+ b a) (- b a)) (* (+ b a) (- b a)))))) (* y-scale y-scale))) (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (sqrt (/ 1 (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (* x-scale x-scale))) (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale)))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) | |
| 4.5% | #s(approx (* (/ -1 (* (neg (* a b)) (* 4 (* a b)))) (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))) | |
| ▶ | 17.6% | #s(approx (* (/ -1 (* (neg (* a b)) (* 4 (* a b)))) (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))) |
| 35.1% | #s(approx (* (/ -1 (* (neg (* a b)) (* 4 (* a b)))) (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))))) | |
| 15.7% | #s(approx (* (/ -1 (* (neg (* a b)) (* 4 (* a b)))) (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))))) | |
| 14.8% | #s(approx (* (/ -1 (* (neg (* a b)) (* 4 (* a b)))) (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 a (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))))))) |
Compiled 10 504 to 4 516 computations (57% saved)
| 1× | egg-herbie |
Found 19 expressions of interest:
| New | Metric | Score | Program |
|---|---|---|---|
| ✓ | cost-diff | 320 | (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
| ✓ | cost-diff | 320 | (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) |
| ✓ | cost-diff | 384 | (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) |
| ✓ | cost-diff | 640 | (*.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 4 binary64) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) |
| ✓ | cost-diff | 0 | #s(approx (* (/ -1 (* (neg (* a b)) (* 4 (* a b)))) (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))) |
| ✓ | cost-diff | 128 | (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) |
| ✓ | cost-diff | 128 | (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) |
| ✓ | cost-diff | 128 | (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) |
| ✓ | cost-diff | 0 | (*.f64 (*.f64 a y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
| ✓ | cost-diff | 0 | (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
| ✓ | cost-diff | 0 | #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))) |
| ✓ | cost-diff | 0 | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))) |
| ✓ | cost-diff | 0 | (*.f64 b y-scale) |
| ✓ | cost-diff | 0 | #s(approx (* (* y-scale 4) (* b 1/4)) (*.f64 b y-scale)) |
| ✓ | cost-diff | 0 | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* y-scale 4) (* b 1/4)) (*.f64 b y-scale))) |
| ✓ | cost-diff | 0 | (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) |
| ✓ | cost-diff | 0 | (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) |
| ✓ | cost-diff | 0 | (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 #s(approx (pow (cos (* 1/180 (* angle (PI)))) 2) #s(literal 1 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))))) |
| ✓ | cost-diff | 0 | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 #s(approx (pow (cos (* 1/180 (* angle (PI)))) 2) #s(literal 1 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a))))))) |
| 8 738× | lower-*.f32 |
| 8 664× | lower-*.f64 |
| 5 534× | lower-fma.f32 |
| 5 526× | lower-fma.f64 |
| 3 838× | lower-+.f32 |
Useful iterations: 0 (0.0ms)
| Iter | Nodes | Cost |
|---|---|---|
| 0 | 229 | 3644 |
| 0 | 306 | 3478 |
| 1 | 816 | 3441 |
| 2 | 3183 | 3418 |
| 0 | 8840 | 3226 |
| 1× | iter limit |
| 1× | node limit |
| 1× | iter limit |
| Inputs |
|---|
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 #s(approx (pow (cos (* 1/180 (* angle (PI)))) 2) #s(literal 1 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 #s(approx (pow (cos (* 1/180 (* angle (PI)))) 2) #s(literal 1 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) |
#s(literal 1/4 binary64) |
(*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) |
y-scale |
(sqrt.f64 #s(literal 8 binary64)) |
#s(literal 8 binary64) |
(sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 #s(approx (pow (cos (* 1/180 (* angle (PI)))) 2) #s(literal 1 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a))))) |
(*.f64 #s(literal 2 binary64) (fma.f64 #s(approx (pow (cos (* 1/180 (* angle (PI)))) 2) #s(literal 1 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))) |
#s(literal 2 binary64) |
(fma.f64 #s(approx (pow (cos (* 1/180 (* angle (PI)))) 2) #s(literal 1 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a))) |
#s(approx (pow (cos (* 1/180 (* angle (PI)))) 2) #s(literal 1 binary64)) |
#s(literal 1 binary64) |
(*.f64 b b) |
b |
(*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) |
(pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) |
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
(*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) |
#s(literal 1/180 binary64) |
(*.f64 angle (PI.f64)) |
angle |
(PI.f64) |
(*.f64 a a) |
a |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* y-scale 4) (* b 1/4)) (*.f64 b y-scale))) |
#s(approx (* (* y-scale 4) (* b 1/4)) (*.f64 b y-scale)) |
(*.f64 b y-scale) |
b |
y-scale |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))) |
#s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
#s(literal 1/4 binary64) |
(*.f64 (*.f64 a y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(*.f64 a y-scale) |
a |
y-scale |
(*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) |
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
(*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) |
#s(literal 1/180 binary64) |
(*.f64 angle (PI.f64)) |
angle |
(PI.f64) |
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) |
(sqrt.f64 #s(literal 2 binary64)) |
#s(literal 2 binary64) |
(sqrt.f64 #s(literal 8 binary64)) |
#s(literal 8 binary64) |
#s(approx (* (/ -1 (* (neg (* a b)) (* 4 (* a b)))) (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) |
#s(literal 1/4 binary64) |
(*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) |
x-scale |
(*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) |
y-scale |
(sqrt.f64 #s(literal 8 binary64)) |
#s(literal 8 binary64) |
(sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))) |
(*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) |
#s(literal 2 binary64) |
(+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) |
(/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) |
(*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) |
(*.f64 a a) |
a |
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) |
#s(literal 1/2 binary64) |
(*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) |
(cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) |
(*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))) |
#s(literal 1/90 binary64) |
(*.f64 angle (PI.f64)) |
angle |
(PI.f64) |
(*.f64 y-scale y-scale) |
(/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) |
(*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) |
(*.f64 b b) |
b |
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) |
(*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) |
#s(literal -1/2 binary64) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(approx (+ (* 1/8 (/ (* (* (* y-scale (sqrt 8)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (/ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (* (+ b a) (- b a)) (* (+ b a) (- b a)))))) (* y-scale y-scale))) (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (sqrt (/ 1 (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (* x-scale x-scale))) (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (*.f64 (neg.f64 b) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 4 binary64) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) x-scale)) |
(*.f64 #s(approx (+ (* 1/8 (/ (* (* (* y-scale (sqrt 8)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (/ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (* (+ b a) (- b a)) (* (+ b a) (- b a)))))) (* y-scale y-scale))) (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (sqrt (/ 1 (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (* x-scale x-scale))) (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (*.f64 (neg.f64 b) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 4 binary64) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) x-scale) |
#s(approx (+ (* 1/8 (/ (* (* (* y-scale (sqrt 8)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (/ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (* (+ b a) (- b a)) (* (+ b a) (- b a)))))) (* y-scale y-scale))) (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (sqrt (/ 1 (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (* x-scale x-scale))) (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (*.f64 (neg.f64 b) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 4 binary64) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) |
(*.f64 (neg.f64 b) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 4 binary64) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) |
(neg.f64 b) |
b |
(fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 4 binary64) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) |
#s(literal 1/8 binary64) |
(/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) |
(*.f64 (*.f64 y-scale y-scale) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))))) |
(*.f64 y-scale y-scale) |
y-scale |
(*.f64 #s(literal 2 binary64) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)))) |
#s(literal 2 binary64) |
(fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) |
#s(literal 1/2 binary64) |
(*.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) |
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) |
(*.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) |
(*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) |
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) |
(cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) |
(*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
(*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) |
#s(literal 1/180 binary64) |
(*.f64 angle (PI.f64)) |
angle |
(PI.f64) |
(/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) |
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) |
(*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) |
#s(literal -1/2 binary64) |
(*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) |
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
(*.f64 x-scale x-scale) |
x-scale |
(*.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 4 binary64) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) |
#s(literal 1/4 binary64) |
(*.f64 #s(literal 4 binary64) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) |
#s(literal 4 binary64) |
| Outputs |
|---|
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 #s(approx (pow (cos (* 1/180 (* angle (PI)))) 2) #s(literal 1 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) #s(literal 1/4 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 #s(approx (pow (cos (* 1/180 (* angle (PI)))) 2) #s(literal 1 binary64)) (*.f64 b b))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 #s(approx (pow (cos (* 1/180 (* angle (PI)))) 2) #s(literal 1 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))))) |
(*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) #s(literal 1/4 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 #s(approx (pow (cos (* 1/180 (* angle (PI)))) 2) #s(literal 1 binary64)) (*.f64 b b)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) |
(*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) #s(literal 1/4 binary64))) |
#s(literal 1/4 binary64) |
(*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) |
y-scale |
(sqrt.f64 #s(literal 8 binary64)) |
#s(literal 8 binary64) |
(sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 #s(approx (pow (cos (* 1/180 (* angle (PI)))) 2) #s(literal 1 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a))))) |
(sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 #s(approx (pow (cos (* 1/180 (* angle (PI)))) 2) #s(literal 1 binary64)) (*.f64 b b))))) |
(*.f64 #s(literal 2 binary64) (fma.f64 #s(approx (pow (cos (* 1/180 (* angle (PI)))) 2) #s(literal 1 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))) |
(*.f64 #s(literal 2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 #s(approx (pow (cos (* 1/180 (* angle (PI)))) 2) #s(literal 1 binary64)) (*.f64 b b)))) |
#s(literal 2 binary64) |
(fma.f64 #s(approx (pow (cos (* 1/180 (* angle (PI)))) 2) #s(literal 1 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a))) |
(fma.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 #s(approx (pow (cos (* 1/180 (* angle (PI)))) 2) #s(literal 1 binary64)) (*.f64 b b))) |
#s(approx (pow (cos (* 1/180 (* angle (PI)))) 2) #s(literal 1 binary64)) |
#s(literal 1 binary64) |
(*.f64 b b) |
b |
(*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) |
(*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 a a)) |
(pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) |
(pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) |
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
(sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) |
(*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) |
(*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))) |
#s(literal 1/180 binary64) |
(*.f64 angle (PI.f64)) |
angle |
(PI.f64) |
(*.f64 a a) |
a |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* y-scale 4) (* b 1/4)) (*.f64 b y-scale))) |
#s(approx (* (* y-scale 4) (* b 1/4)) (*.f64 b y-scale)) |
(*.f64 b y-scale) |
b |
y-scale |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 a y-scale)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) |
#s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))) |
#s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 a y-scale)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 a y-scale)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) |
#s(literal 1/4 binary64) |
(*.f64 (*.f64 a y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(*.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 8 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a y-scale))) |
(*.f64 a y-scale) |
a |
y-scale |
(*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) |
(*.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (sqrt.f64 #s(literal 2 binary64)))) |
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
(sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) |
(*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) |
(*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))) |
#s(literal 1/180 binary64) |
(*.f64 angle (PI.f64)) |
angle |
(PI.f64) |
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) |
(*.f64 (sqrt.f64 #s(literal 8 binary64)) (sqrt.f64 #s(literal 2 binary64))) |
(sqrt.f64 #s(literal 2 binary64)) |
#s(literal 2 binary64) |
(sqrt.f64 #s(literal 8 binary64)) |
#s(literal 8 binary64) |
#s(approx (* (/ -1 (* (neg (* a b)) (* 4 (* a b)))) (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))) |
#s(approx (* (/ -1 (* (neg (* a b)) (* 4 (* a b)))) (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale)))))) (*.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 (sqrt.f64 #s(literal 8 binary64)) #s(literal 1/4 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (/.f64 (*.f64 b b) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 y-scale y-scale))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))) |
(*.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 (sqrt.f64 #s(literal 8 binary64)) #s(literal 1/4 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (/.f64 (*.f64 b b) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 y-scale y-scale)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) |
(*.f64 (*.f64 x-scale y-scale) (*.f64 (sqrt.f64 #s(literal 8 binary64)) #s(literal 1/4 binary64))) |
#s(literal 1/4 binary64) |
(*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) |
(*.f64 y-scale (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) |
x-scale |
(*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) |
y-scale |
(sqrt.f64 #s(literal 8 binary64)) |
#s(literal 8 binary64) |
(sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))) |
(sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (/.f64 (*.f64 b b) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 y-scale y-scale))))) |
(*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) |
(*.f64 #s(literal 2 binary64) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (/.f64 (*.f64 b b) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 y-scale y-scale)))) |
#s(literal 2 binary64) |
(+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) |
(fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (/.f64 (*.f64 b b) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 y-scale y-scale))) |
(/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) |
(/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 y-scale y-scale)) |
(*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) |
(*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) |
(*.f64 a a) |
a |
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) |
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) |
#s(literal 1/2 binary64) |
(*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) |
(*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))) |
(cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) |
(cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) |
(*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))) |
(*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))) |
#s(literal 1/90 binary64) |
(*.f64 angle (PI.f64)) |
angle |
(PI.f64) |
(*.f64 y-scale y-scale) |
(/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) |
(/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 y-scale y-scale)) |
(*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) |
(*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) |
(*.f64 b b) |
b |
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) |
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) |
(*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) |
(*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))) |
#s(literal -1/2 binary64) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(approx (+ (* 1/8 (/ (* (* (* y-scale (sqrt 8)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (/ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (* (+ b a) (- b a)) (* (+ b a) (- b a)))))) (* y-scale y-scale))) (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (sqrt (/ 1 (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (* x-scale x-scale))) (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (*.f64 (neg.f64 b) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 4 binary64) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) x-scale)) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 x-scale #s(approx (+ (* 1/8 (/ (* (* (* y-scale (sqrt 8)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (/ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (* (+ b a) (- b a)) (* (+ b a) (- b a)))))) (* y-scale y-scale))) (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (sqrt (/ 1 (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (* x-scale x-scale))) (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (*.f64 (neg.f64 b) (fma.f64 #s(literal 1/8 binary64) (*.f64 (fma.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))) #s(literal 1 binary64))) (/.f64 (*.f64 y-scale y-scale) (*.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) (*.f64 x-scale x-scale)))) (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))) |
(*.f64 #s(approx (+ (* 1/8 (/ (* (* (* y-scale (sqrt 8)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (/ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (* (+ b a) (- b a)) (* (+ b a) (- b a)))))) (* y-scale y-scale))) (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (sqrt (/ 1 (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (* x-scale x-scale))) (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (*.f64 (neg.f64 b) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 4 binary64) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) x-scale) |
(*.f64 x-scale #s(approx (+ (* 1/8 (/ (* (* (* y-scale (sqrt 8)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (/ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (* (+ b a) (- b a)) (* (+ b a) (- b a)))))) (* y-scale y-scale))) (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (sqrt (/ 1 (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (* x-scale x-scale))) (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (*.f64 (neg.f64 b) (fma.f64 #s(literal 1/8 binary64) (*.f64 (fma.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))) #s(literal 1 binary64))) (/.f64 (*.f64 y-scale y-scale) (*.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) (*.f64 x-scale x-scale)))) (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) |
#s(approx (+ (* 1/8 (/ (* (* (* y-scale (sqrt 8)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (/ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (* (+ b a) (- b a)) (* (+ b a) (- b a)))))) (* y-scale y-scale))) (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (sqrt (/ 1 (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (* x-scale x-scale))) (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (*.f64 (neg.f64 b) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 4 binary64) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) |
#s(approx (+ (* 1/8 (/ (* (* (* y-scale (sqrt 8)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (/ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (* (+ b a) (- b a)) (* (+ b a) (- b a)))))) (* y-scale y-scale))) (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (sqrt (/ 1 (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (* x-scale x-scale))) (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (*.f64 (neg.f64 b) (fma.f64 #s(literal 1/8 binary64) (*.f64 (fma.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))) #s(literal 1 binary64))) (/.f64 (*.f64 y-scale y-scale) (*.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) (*.f64 x-scale x-scale)))) (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) |
(*.f64 (neg.f64 b) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 4 binary64) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) |
(*.f64 (neg.f64 b) (fma.f64 #s(literal 1/8 binary64) (*.f64 (fma.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))) #s(literal 1 binary64))) (/.f64 (*.f64 y-scale y-scale) (*.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) (*.f64 x-scale x-scale)))) (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))) |
(neg.f64 b) |
b |
(fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 4 binary64) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) |
(fma.f64 #s(literal 1/8 binary64) (*.f64 (fma.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))) #s(literal 1 binary64))) (/.f64 (*.f64 y-scale y-scale) (*.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) (*.f64 x-scale x-scale)))) (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) |
#s(literal 1/8 binary64) |
(/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) |
(*.f64 (fma.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))) #s(literal 1 binary64))) (/.f64 (*.f64 y-scale y-scale) (*.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) (*.f64 x-scale x-scale)))) |
(*.f64 (*.f64 y-scale y-scale) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))))) |
(*.f64 (*.f64 y-scale y-scale) (fma.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))) #s(literal 1 binary64)))) |
(*.f64 y-scale y-scale) |
y-scale |
(*.f64 #s(literal 2 binary64) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)))) |
(fma.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))) #s(literal 1 binary64))) |
#s(literal 2 binary64) |
(fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) |
(fma.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale))) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))) #s(literal 1/2 binary64)) |
#s(literal 1/2 binary64) |
(*.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) |
(/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale))) |
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) |
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale))) |
(*.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) |
(/.f64 (*.f64 (fma.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))) #s(literal 1 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 y-scale y-scale)) |
(*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) |
(/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 y-scale y-scale)) |
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) |
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) |
(cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) |
(cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) |
(*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
(*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))) |
(*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) |
(*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))) |
#s(literal 1/180 binary64) |
(*.f64 angle (PI.f64)) |
angle |
(PI.f64) |
(/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) |
(/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) |
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) |
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) |
(*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) |
(*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))) |
#s(literal -1/2 binary64) |
(*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) |
(*.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) (*.f64 x-scale x-scale)) |
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
(sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) |
(*.f64 x-scale x-scale) |
x-scale |
(*.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 4 binary64) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) |
(sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) |
#s(literal 1/4 binary64) |
(*.f64 #s(literal 4 binary64) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) |
(*.f64 #s(literal 4 binary64) (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) |
#s(literal 4 binary64) |
Found 19 expressions of interest:
| New | Metric | Score | Program |
|---|---|---|---|
| ✓ | accuracy | 70.1% | (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) |
| ✓ | accuracy | 65.4% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(approx (+ (* 1/8 (/ (* (* (* y-scale (sqrt 8)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (/ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (* (+ b a) (- b a)) (* (+ b a) (- b a)))))) (* y-scale y-scale))) (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (sqrt (/ 1 (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (* x-scale x-scale))) (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (*.f64 (neg.f64 b) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 4 binary64) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) x-scale)) |
| ✓ | accuracy | 57.4% | (*.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) |
| ✓ | accuracy | 27.9% | #s(approx (+ (* 1/8 (/ (* (* (* y-scale (sqrt 8)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (/ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (* (+ b a) (- b a)) (* (+ b a) (- b a)))))) (* y-scale y-scale))) (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (sqrt (/ 1 (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (* x-scale x-scale))) (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (*.f64 (neg.f64 b) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 4 binary64) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) |
| ✓ | accuracy | 73.1% | (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))) |
| ✓ | accuracy | 72.3% | (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) |
| ✓ | accuracy | 70.1% | (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) |
| ✓ | accuracy | 56.0% | #s(approx (* (/ -1 (* (neg (* a b)) (* 4 (* a b)))) (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))) |
| ✓ | accuracy | 94.1% | (*.f64 (*.f64 a y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
| ✓ | accuracy | 70.7% | (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
| ✓ | accuracy | 59.1% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))) |
| ✓ | accuracy | 31.6% | #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))) |
| ✓ | accuracy | 100.0% | (*.f64 b y-scale) |
| ✓ | accuracy | 100.0% | #s(approx (* (* y-scale 4) (* b 1/4)) (*.f64 b y-scale)) |
| ✓ | accuracy | 39.9% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* y-scale 4) (* b 1/4)) (*.f64 b y-scale))) |
| ✓ | accuracy | 70.9% | #s(approx (pow (cos (* 1/180 (* angle (PI)))) 2) #s(literal 1 binary64)) |
| ✓ | accuracy | 70.7% | (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
| ✓ | accuracy | 63.3% | (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 #s(approx (pow (cos (* 1/180 (* angle (PI)))) 2) #s(literal 1 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a))))) |
| ✓ | accuracy | 59.1% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 #s(approx (pow (cos (* 1/180 (* angle (PI)))) 2) #s(literal 1 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a))))))) |
| 647.0ms | 168× | 1 | valid |
| 241.0ms | 67× | 2 | valid |
| 19.0ms | 13× | 0 | valid |
| 17.0ms | 1× | 2 | exit |
| 11.0ms | 7× | 1 | exit |
Compiled 2 949 to 205 computations (93% saved)
ival-mult: 250.0ms (30.2% of total)ival-cos: 149.0ms (18% of total)ival-div: 92.0ms (11.1% of total)ival-sin: 78.0ms (9.4% of total)adjust: 73.0ms (8.8% of total)ival-add: 51.0ms (6.2% of total)ival-pow2: 46.0ms (5.6% of total)ival-sqrt: 34.0ms (4.1% of total)const: 26.0ms (3.1% of total)ival-sub: 11.0ms (1.3% of total)ival-hypot: 8.0ms (1% of total)ival-neg: 6.0ms (0.7% of total)ival-pi: 2.0ms (0.2% of total)exact: 1.0ms (0.1% of total)ival-assert: 0.0ms (0% of total)ival-true: 0.0ms (0% of total)| Inputs |
|---|
#<alt #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 #s(approx (pow (cos (* 1/180 (* angle (PI)))) 2) #s(literal 1 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))))))> |
#<alt (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 #s(approx (pow (cos (* 1/180 (* angle (PI)))) 2) #s(literal 1 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a))))))> |
#<alt (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))> |
#<alt (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))> |
#<alt #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* y-scale 4) (* b 1/4)) (*.f64 b y-scale)))> |
#<alt #s(approx (* (* y-scale 4) (* b 1/4)) (*.f64 b y-scale))> |
#<alt (*.f64 b y-scale)> |
#<alt #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))> |
#<alt #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))> |
#<alt (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))> |
#<alt (*.f64 (*.f64 a y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))> |
#<alt (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))> |
#<alt (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))> |
#<alt (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))> |
#<alt #s(approx (* (/ -1 (* (neg (* a b)) (* 4 (* a b)))) (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))))> |
#<alt (*.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 4 binary64) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))> |
#<alt (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))> |
#<alt (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)))> |
#<alt (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))> |
#<alt (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 #s(approx (pow (cos (* 1/180 (* angle (PI)))) 2) #s(literal 1 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))))> |
#<alt (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))> |
#<alt #s(approx (pow (cos (* 1/180 (* angle (PI)))) 2) #s(literal 1 binary64))> |
#<alt (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))> |
#<alt (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))> |
#<alt #s(approx (+ (* 1/8 (/ (* (* (* y-scale (sqrt 8)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (/ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (* (+ b a) (- b a)) (* (+ b a) (- b a)))))) (* y-scale y-scale))) (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (sqrt (/ 1 (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (* x-scale x-scale))) (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (*.f64 (neg.f64 b) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 4 binary64) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))> |
#<alt (*.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))> |
#<alt #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(approx (+ (* 1/8 (/ (* (* (* y-scale (sqrt 8)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (/ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (* (+ b a) (- b a)) (* (+ b a) (- b a)))))) (* y-scale y-scale))) (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (sqrt (/ 1 (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (* x-scale x-scale))) (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (*.f64 (neg.f64 b) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 4 binary64) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) x-scale))> |
#<alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))> |
| Outputs |
|---|
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))> |
#<alt (+ (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))> |
#<alt (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))))> |
#<alt (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))))))> |
#<alt (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))> |
#<alt (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))> |
#<alt (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))))> |
#<alt (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))))> |
#<alt (* -1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))> |
#<alt (* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))))> |
#<alt (* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))))> |
#<alt (* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))> |
#<alt (+ (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))> |
#<alt (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))))> |
#<alt (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))))))> |
#<alt (* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))> |
#<alt (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))> |
#<alt (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))> |
#<alt (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))))> |
#<alt (* -1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))> |
#<alt (* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))> |
#<alt (* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))))> |
#<alt (* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))))> |
#<alt (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))> |
#<alt (+ (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))> |
#<alt (+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))))> |
#<alt (+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))> |
#<alt (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))> |
#<alt (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))> |
#<alt (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))))> |
#<alt (* -1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))> |
#<alt (* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))> |
#<alt (* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))))> |
#<alt (* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))))> |
#<alt (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))> |
#<alt (+ (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))> |
#<alt (+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))))> |
#<alt (+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))> |
#<alt (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))> |
#<alt (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))> |
#<alt (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))))> |
#<alt (* -1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))> |
#<alt (* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))> |
#<alt (* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))))> |
#<alt (* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))))> |
#<alt (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))> |
#<alt (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))))))) (* b (sqrt 2)))) (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))))> |
#<alt (+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))))) (* b (sqrt 2)))))))> |
#<alt (+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))))) (* b (sqrt 2)))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))))) (* 1/2 (/ (* (pow x-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2)))))))) (* b (sqrt 2)))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))> |
#<alt (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))> |
#<alt (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))> |
#<alt (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))> |
#<alt (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))> |
#<alt (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))> |
#<alt (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))> |
#<alt (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))> |
#<alt (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))> |
#<alt (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))> |
#<alt (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))> |
#<alt (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))> |
#<alt (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))> |
#<alt (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))> |
#<alt (+ (* 1/8 (/ (* (pow angle 2) (* y-scale (* (sqrt 2) (* (sqrt 8) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))))))) b)) (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))))> |
#<alt (+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* y-scale (* (sqrt 2) (* (sqrt 8) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))))) b)) (* 1/8 (/ (* (pow angle 2) (* y-scale (* (sqrt 2) (* (sqrt 8) (- (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (* 1/4 (/ (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2) (pow b 2)))))))) b)))))> |
#<alt (+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* y-scale (* (sqrt 2) (* (sqrt 8) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))))) b)) (* (pow angle 2) (+ (* 1/8 (/ (* y-scale (* (sqrt 2) (* (sqrt 8) (- (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (* 1/4 (/ (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2) (pow b 2))))))) b)) (* 1/8 (/ (* (pow angle 2) (* y-scale (* (sqrt 2) (* (sqrt 8) (- (+ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6))))) (* 1/2 (/ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (- (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (* 1/4 (/ (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2) (pow b 2))))) (pow b 2)))))))) b)))))))> |
#<alt (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))> |
#<alt (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))> |
#<alt (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))> |
#<alt (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))> |
#<alt (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))> |
#<alt (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))> |
#<alt (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))> |
#<alt (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))> |
#<alt (* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))> |
#<alt (+ (* 1/8 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* a (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))> |
#<alt (+ (* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (* (pow b 2) (+ (* -1/32 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow a 3) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* 1/8 (/ (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (* a (sin (* 1/180 (* angle (PI))))))))))> |
#<alt (+ (* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (* (pow b 2) (+ (* 1/8 (/ (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (* a (sin (* 1/180 (* angle (PI))))))) (* (pow b 2) (+ (* -1/32 (/ (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8)))) (* (pow a 3) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* 1/64 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 6) (* (sqrt 2) (sqrt 8))))) (* (pow a 5) (pow (sin (* 1/180 (* angle (PI)))) 5)))))))))> |
#<alt (* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))> |
#<alt (* b (+ (* 1/8 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))> |
#<alt (* b (+ (* -1/32 (/ (* (pow a 4) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/8 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))> |
#<alt (* b (+ (* -1/32 (/ (* (pow a 4) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/64 (/ (* (pow a 6) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 6) (* (sqrt 2) (sqrt 8))))) (* (pow b 6) (pow (cos (* 1/180 (* angle (PI)))) 5)))) (+ (* 1/8 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))))> |
#<alt (* -1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))> |
#<alt (* -1 (* b (+ (* 1/8 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))> |
#<alt (* -1 (* b (+ (* -1/32 (/ (* (pow a 4) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/8 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))))> |
#<alt (* -1 (* b (+ (* -1/32 (/ (* (pow a 4) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/64 (/ (* (pow a 6) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 6) (* (sqrt 2) (sqrt 8))))) (* (pow b 6) (pow (cos (* 1/180 (* angle (PI)))) 5)))) (+ (* 1/8 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))))> |
#<alt (* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))> |
#<alt (+ (* 1/8 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* b (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))> |
#<alt (+ (* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (* (pow a 2) (+ (* -1/32 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow b 3) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (* 1/8 (/ (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (* b (cos (* 1/180 (* angle (PI))))))))))> |
#<alt (+ (* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (* (pow a 2) (+ (* 1/8 (/ (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (* b (cos (* 1/180 (* angle (PI))))))) (* (pow a 2) (+ (* -1/32 (/ (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8)))) (* (pow b 3) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (* 1/64 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 6) (* (sqrt 2) (sqrt 8))))) (* (pow b 5) (pow (cos (* 1/180 (* angle (PI)))) 5)))))))))> |
#<alt (* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))> |
#<alt (* a (+ (* 1/8 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))> |
#<alt (* a (+ (* -1/32 (/ (* (pow b 4) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/8 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))> |
#<alt (* a (+ (* -1/32 (/ (* (pow b 4) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/64 (/ (* (pow b 6) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 6) (* (sqrt 2) (sqrt 8))))) (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 5)))) (+ (* 1/8 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))))> |
#<alt (* -1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))> |
#<alt (* -1 (* a (+ (* 1/8 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))> |
#<alt (* -1 (* a (+ (* -1/32 (/ (* (pow b 4) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/8 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))))> |
#<alt (* -1 (* a (+ (* -1/32 (/ (* (pow b 4) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/64 (/ (* (pow b 6) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 6) (* (sqrt 2) (sqrt 8))))) (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 5)))) (+ (* 1/8 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))))> |
#<alt (* 1/4 (* y-scale (sqrt 8)))> |
#<alt (* 1/4 (* y-scale (sqrt 8)))> |
#<alt (* 1/4 (* y-scale (sqrt 8)))> |
#<alt (* 1/4 (* y-scale (sqrt 8)))> |
#<alt (* 1/4 (* y-scale (sqrt 8)))> |
#<alt (* 1/4 (* y-scale (sqrt 8)))> |
#<alt (* 1/4 (* y-scale (sqrt 8)))> |
#<alt (* 1/4 (* y-scale (sqrt 8)))> |
#<alt (* 1/4 (* y-scale (sqrt 8)))> |
#<alt (* 1/4 (* y-scale (sqrt 8)))> |
#<alt (* 1/4 (* y-scale (sqrt 8)))> |
#<alt (* 1/4 (* y-scale (sqrt 8)))> |
#<alt (* y-scale (sqrt 8))> |
#<alt (* y-scale (sqrt 8))> |
#<alt (* y-scale (sqrt 8))> |
#<alt (* y-scale (sqrt 8))> |
#<alt (* y-scale (sqrt 8))> |
#<alt (* y-scale (sqrt 8))> |
#<alt (* y-scale (sqrt 8))> |
#<alt (* y-scale (sqrt 8))> |
#<alt (* y-scale (sqrt 8))> |
#<alt (* y-scale (sqrt 8))> |
#<alt (* y-scale (sqrt 8))> |
#<alt (* y-scale (sqrt 8))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))> |
#<alt (+ (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))> |
#<alt (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))))> |
#<alt (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))))))> |
#<alt (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))> |
#<alt (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))> |
#<alt (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))))> |
#<alt (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))))> |
#<alt (* -1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))> |
#<alt (* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))))> |
#<alt (* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))))> |
#<alt (* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))> |
#<alt (+ (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))> |
#<alt (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))))> |
#<alt (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))))))> |
#<alt (* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))> |
#<alt (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))> |
#<alt (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))> |
#<alt (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))))> |
#<alt (* -1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))> |
#<alt (* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))> |
#<alt (* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))))> |
#<alt (* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))))> |
#<alt (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))> |
#<alt (+ (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))> |
#<alt (+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))))> |
#<alt (+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))> |
#<alt (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))> |
#<alt (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))> |
#<alt (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))))> |
#<alt (* -1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))> |
#<alt (* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))> |
#<alt (* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))))> |
#<alt (* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))))> |
#<alt (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))> |
#<alt (+ (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))> |
#<alt (+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))))> |
#<alt (+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))> |
#<alt (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))> |
#<alt (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))> |
#<alt (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))))> |
#<alt (* -1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))> |
#<alt (* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))> |
#<alt (* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))))> |
#<alt (* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))))> |
#<alt (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))> |
#<alt (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))))))) (* b (sqrt 2)))) (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))))> |
#<alt (+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))))) (* b (sqrt 2)))))))> |
#<alt (+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))))) (* b (sqrt 2)))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))))) (* 1/2 (/ (* (pow x-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2)))))))) (* b (sqrt 2)))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))> |
#<alt (* b y-scale)> |
#<alt (* b y-scale)> |
#<alt (* b y-scale)> |
#<alt (* b y-scale)> |
#<alt (* b y-scale)> |
#<alt (* b y-scale)> |
#<alt (* b y-scale)> |
#<alt (* b y-scale)> |
#<alt (* b y-scale)> |
#<alt (* b y-scale)> |
#<alt (* b y-scale)> |
#<alt (* b y-scale)> |
#<alt (* b y-scale)> |
#<alt (* b y-scale)> |
#<alt (* b y-scale)> |
#<alt (* b y-scale)> |
#<alt (* b y-scale)> |
#<alt (* b y-scale)> |
#<alt (* b y-scale)> |
#<alt (* b y-scale)> |
#<alt (* b y-scale)> |
#<alt (* b y-scale)> |
#<alt (* b y-scale)> |
#<alt (* b y-scale)> |
#<alt (* b y-scale)> |
#<alt (* b y-scale)> |
#<alt (* b y-scale)> |
#<alt (* b y-scale)> |
#<alt (* b y-scale)> |
#<alt (* b y-scale)> |
#<alt (* b y-scale)> |
#<alt (* b y-scale)> |
#<alt (* b y-scale)> |
#<alt (* b y-scale)> |
#<alt (* b y-scale)> |
#<alt (* b y-scale)> |
#<alt (* b y-scale)> |
#<alt (* b y-scale)> |
#<alt (* b y-scale)> |
#<alt (* b y-scale)> |
#<alt (* b y-scale)> |
#<alt (* b y-scale)> |
#<alt (* b y-scale)> |
#<alt (* b y-scale)> |
#<alt (* b y-scale)> |
#<alt (* b y-scale)> |
#<alt (* b y-scale)> |
#<alt (* b y-scale)> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))> |
#<alt (+ (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))> |
#<alt (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))))> |
#<alt (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))))))> |
#<alt (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))> |
#<alt (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))> |
#<alt (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))))> |
#<alt (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))))> |
#<alt (* -1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))> |
#<alt (* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))))> |
#<alt (* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))))> |
#<alt (* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))> |
#<alt (+ (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))> |
#<alt (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))))> |
#<alt (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))))))> |
#<alt (* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))> |
#<alt (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))> |
#<alt (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))> |
#<alt (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))))> |
#<alt (* -1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))> |
#<alt (* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))> |
#<alt (* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))))> |
#<alt (* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))))> |
#<alt (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))> |
#<alt (+ (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))> |
#<alt (+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))))> |
#<alt (+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))> |
#<alt (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))> |
#<alt (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))> |
#<alt (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))))> |
#<alt (* -1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))> |
#<alt (* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))> |
#<alt (* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))))> |
#<alt (* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))))> |
#<alt (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))> |
#<alt (+ (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))> |
#<alt (+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))))> |
#<alt (+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))> |
#<alt (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))> |
#<alt (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))> |
#<alt (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))))> |
#<alt (* -1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))> |
#<alt (* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))> |
#<alt (* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))))> |
#<alt (* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))))> |
#<alt (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))> |
#<alt (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))))))) (* b (sqrt 2)))) (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))))> |
#<alt (+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))))) (* b (sqrt 2)))))))> |
#<alt (+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))))) (* b (sqrt 2)))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))))) (* 1/2 (/ (* (pow x-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2)))))))) (* b (sqrt 2)))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))> |
#<alt (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))> |
#<alt (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))> |
#<alt (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))> |
#<alt (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))> |
#<alt (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))> |
#<alt (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))> |
#<alt (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))> |
#<alt (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))> |
#<alt (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))> |
#<alt (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))> |
#<alt (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))> |
#<alt (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))> |
#<alt (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))> |
#<alt (+ (* 1/8 (/ (* (pow angle 2) (* y-scale (* (sqrt 2) (* (sqrt 8) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))))))) b)) (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))))> |
#<alt (+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* y-scale (* (sqrt 2) (* (sqrt 8) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))))) b)) (* 1/8 (/ (* (pow angle 2) (* y-scale (* (sqrt 2) (* (sqrt 8) (- (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (* 1/4 (/ (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2) (pow b 2)))))))) b)))))> |
#<alt (+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* y-scale (* (sqrt 2) (* (sqrt 8) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))))) b)) (* (pow angle 2) (+ (* 1/8 (/ (* y-scale (* (sqrt 2) (* (sqrt 8) (- (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (* 1/4 (/ (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2) (pow b 2))))))) b)) (* 1/8 (/ (* (pow angle 2) (* y-scale (* (sqrt 2) (* (sqrt 8) (- (+ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6))))) (* 1/2 (/ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (- (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (* 1/4 (/ (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2) (pow b 2))))) (pow b 2)))))))) b)))))))> |
#<alt (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))> |
#<alt (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))> |
#<alt (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))> |
#<alt (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))> |
#<alt (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))> |
#<alt (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))> |
#<alt (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))> |
#<alt (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))> |
#<alt (* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))> |
#<alt (+ (* 1/8 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* a (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))> |
#<alt (+ (* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (* (pow b 2) (+ (* -1/32 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow a 3) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* 1/8 (/ (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (* a (sin (* 1/180 (* angle (PI))))))))))> |
#<alt (+ (* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (* (pow b 2) (+ (* 1/8 (/ (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (* a (sin (* 1/180 (* angle (PI))))))) (* (pow b 2) (+ (* -1/32 (/ (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8)))) (* (pow a 3) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* 1/64 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 6) (* (sqrt 2) (sqrt 8))))) (* (pow a 5) (pow (sin (* 1/180 (* angle (PI)))) 5)))))))))> |
#<alt (* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))> |
#<alt (* b (+ (* 1/8 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))> |
#<alt (* b (+ (* -1/32 (/ (* (pow a 4) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/8 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))> |
#<alt (* b (+ (* -1/32 (/ (* (pow a 4) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/64 (/ (* (pow a 6) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 6) (* (sqrt 2) (sqrt 8))))) (* (pow b 6) (pow (cos (* 1/180 (* angle (PI)))) 5)))) (+ (* 1/8 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))))> |
#<alt (* -1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))> |
#<alt (* -1 (* b (+ (* 1/8 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))> |
#<alt (* -1 (* b (+ (* -1/32 (/ (* (pow a 4) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/8 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))))> |
#<alt (* -1 (* b (+ (* -1/32 (/ (* (pow a 4) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/64 (/ (* (pow a 6) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 6) (* (sqrt 2) (sqrt 8))))) (* (pow b 6) (pow (cos (* 1/180 (* angle (PI)))) 5)))) (+ (* 1/8 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))))> |
#<alt (* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))> |
#<alt (+ (* 1/8 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* b (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))> |
#<alt (+ (* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (* (pow a 2) (+ (* -1/32 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow b 3) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (* 1/8 (/ (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (* b (cos (* 1/180 (* angle (PI))))))))))> |
#<alt (+ (* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (* (pow a 2) (+ (* 1/8 (/ (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (* b (cos (* 1/180 (* angle (PI))))))) (* (pow a 2) (+ (* -1/32 (/ (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8)))) (* (pow b 3) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (* 1/64 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 6) (* (sqrt 2) (sqrt 8))))) (* (pow b 5) (pow (cos (* 1/180 (* angle (PI)))) 5)))))))))> |
#<alt (* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))> |
#<alt (* a (+ (* 1/8 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))> |
#<alt (* a (+ (* -1/32 (/ (* (pow b 4) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/8 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))> |
#<alt (* a (+ (* -1/32 (/ (* (pow b 4) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/64 (/ (* (pow b 6) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 6) (* (sqrt 2) (sqrt 8))))) (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 5)))) (+ (* 1/8 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))))> |
#<alt (* -1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))> |
#<alt (* -1 (* a (+ (* 1/8 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))> |
#<alt (* -1 (* a (+ (* -1/32 (/ (* (pow b 4) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/8 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))))> |
#<alt (* -1 (* a (+ (* -1/32 (/ (* (pow b 4) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/64 (/ (* (pow b 6) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 6) (* (sqrt 2) (sqrt 8))))) (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 5)))) (+ (* 1/8 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))))> |
#<alt (* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))> |
#<alt (* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))> |
#<alt (* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))> |
#<alt (* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))> |
#<alt (* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))> |
#<alt (* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))> |
#<alt (* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))> |
#<alt (* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))> |
#<alt (* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))> |
#<alt (* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))> |
#<alt (* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))> |
#<alt (* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))> |
#<alt (* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))> |
#<alt (* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))> |
#<alt (* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))> |
#<alt (* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))> |
#<alt (* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))> |
#<alt (* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))> |
#<alt (* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))> |
#<alt (* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))> |
#<alt (* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))> |
#<alt (* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))> |
#<alt (* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))> |
#<alt (* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))> |
#<alt (* 1/720 (* a (* angle (* y-scale (* (PI) (* (sqrt 2) (sqrt 8)))))))> |
#<alt (* angle (+ (* -1/139968000 (* a (* (pow angle 2) (* y-scale (* (pow (PI) 3) (* (sqrt 2) (sqrt 8))))))) (* 1/720 (* a (* y-scale (* (PI) (* (sqrt 2) (sqrt 8))))))))> |
#<alt (* angle (+ (* 1/720 (* a (* y-scale (* (PI) (* (sqrt 2) (sqrt 8)))))) (* (pow angle 2) (+ (* -1/139968000 (* a (* y-scale (* (pow (PI) 3) (* (sqrt 2) (sqrt 8)))))) (* 1/90699264000000 (* a (* (pow angle 2) (* y-scale (* (pow (PI) 5) (* (sqrt 2) (sqrt 8)))))))))))> |
#<alt (* angle (+ (* 1/720 (* a (* y-scale (* (PI) (* (sqrt 2) (sqrt 8)))))) (* (pow angle 2) (+ (* -1/139968000 (* a (* y-scale (* (pow (PI) 3) (* (sqrt 2) (sqrt 8)))))) (* (pow angle 2) (+ (* -1/123423558451200000000 (* a (* (pow angle 2) (* y-scale (* (pow (PI) 7) (* (sqrt 2) (sqrt 8))))))) (* 1/90699264000000 (* a (* y-scale (* (pow (PI) 5) (* (sqrt 2) (sqrt 8))))))))))))> |
#<alt (* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))> |
#<alt (* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))> |
#<alt (* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))> |
#<alt (* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))> |
#<alt (* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))> |
#<alt (* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))> |
#<alt (* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))> |
#<alt (* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))> |
#<alt (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))> |
#<alt (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))> |
#<alt (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))> |
#<alt (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))> |
#<alt (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))> |
#<alt (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))> |
#<alt (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))> |
#<alt (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))> |
#<alt (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))> |
#<alt (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))> |
#<alt (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))> |
#<alt (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))> |
#<alt (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))> |
#<alt (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))> |
#<alt (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))> |
#<alt (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))> |
#<alt (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))> |
#<alt (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))> |
#<alt (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))> |
#<alt (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))> |
#<alt (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))> |
#<alt (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))> |
#<alt (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))> |
#<alt (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))> |
#<alt (* 1/180 (* a (* angle (* y-scale (* (PI) (* (sqrt 2) (sqrt 8)))))))> |
#<alt (* angle (+ (* -1/34992000 (* a (* (pow angle 2) (* y-scale (* (pow (PI) 3) (* (sqrt 2) (sqrt 8))))))) (* 1/180 (* a (* y-scale (* (PI) (* (sqrt 2) (sqrt 8))))))))> |
#<alt (* angle (+ (* 1/180 (* a (* y-scale (* (PI) (* (sqrt 2) (sqrt 8)))))) (* (pow angle 2) (+ (* -1/34992000 (* a (* y-scale (* (pow (PI) 3) (* (sqrt 2) (sqrt 8)))))) (* 1/22674816000000 (* a (* (pow angle 2) (* y-scale (* (pow (PI) 5) (* (sqrt 2) (sqrt 8)))))))))))> |
#<alt (* angle (+ (* 1/180 (* a (* y-scale (* (PI) (* (sqrt 2) (sqrt 8)))))) (* (pow angle 2) (+ (* -1/34992000 (* a (* y-scale (* (pow (PI) 3) (* (sqrt 2) (sqrt 8)))))) (* (pow angle 2) (+ (* -1/30855889612800000000 (* a (* (pow angle 2) (* y-scale (* (pow (PI) 7) (* (sqrt 2) (sqrt 8))))))) (* 1/22674816000000 (* a (* y-scale (* (pow (PI) 5) (* (sqrt 2) (sqrt 8))))))))))))> |
#<alt (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))> |
#<alt (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))> |
#<alt (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))> |
#<alt (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))> |
#<alt (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))> |
#<alt (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))> |
#<alt (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))> |
#<alt (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))> |
#<alt (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))> |
#<alt (+ (* (pow a 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))> |
#<alt (+ (* (pow a 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))> |
#<alt (+ (* (pow a 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))> |
#<alt (* (pow a 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))> |
#<alt (* (pow a 2) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) (pow y-scale 2))))))> |
#<alt (* (pow a 2) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) (pow y-scale 2))))))> |
#<alt (* (pow a 2) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) (pow y-scale 2))))))> |
#<alt (* (pow a 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))> |
#<alt (* (pow a 2) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) (pow y-scale 2))))))> |
#<alt (* (pow a 2) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) (pow y-scale 2))))))> |
#<alt (* (pow a 2) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) (pow y-scale 2))))))> |
#<alt (/ (pow a 2) (pow y-scale 2))> |
#<alt (+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (pow a 2) (pow y-scale 2)))> |
#<alt (+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2)))))))) (/ (pow a 2) (pow y-scale 2)))> |
#<alt (+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))) (* (pow angle 2) (+ (* -1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow y-scale 2))) (* 1/765275040000000 (/ (* (pow b 2) (pow (PI) 6)) (pow y-scale 2))))))))))) (/ (pow a 2) (pow y-scale 2)))> |
#<alt (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))> |
#<alt (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))> |
#<alt (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))> |
#<alt (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))> |
#<alt (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))> |
#<alt (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))> |
#<alt (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))> |
#<alt (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))> |
#<alt (/ (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2))> |
#<alt (/ (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2))> |
#<alt (/ (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2))> |
#<alt (/ (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2))> |
#<alt (/ (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2))> |
#<alt (/ (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2))> |
#<alt (/ (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2))> |
#<alt (/ (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2))> |
#<alt (/ (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2))> |
#<alt (/ (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2))> |
#<alt (/ (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2))> |
#<alt (/ (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2))> |
#<alt (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))> |
#<alt (+ (* (pow b 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))> |
#<alt (+ (* (pow b 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))> |
#<alt (+ (* (pow b 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))> |
#<alt (* (pow b 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))> |
#<alt (* (pow b 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (pow y-scale 2))))))> |
#<alt (* (pow b 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (pow y-scale 2))))))> |
#<alt (* (pow b 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (pow y-scale 2))))))> |
#<alt (* (pow b 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))> |
#<alt (* (pow b 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (pow y-scale 2))))))> |
#<alt (* (pow b 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (pow y-scale 2))))))> |
#<alt (* (pow b 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (pow y-scale 2))))))> |
#<alt 1> |
#<alt (+ 1 (* -1/32400 (* (pow angle 2) (pow (PI) 2))))> |
#<alt (+ 1 (* (pow angle 2) (+ (* -1/32400 (pow (PI) 2)) (* 1/3149280000 (* (pow angle 2) (pow (PI) 4))))))> |
#<alt (+ 1 (* (pow angle 2) (+ (* -1/32400 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/765275040000000 (* (pow angle 2) (pow (PI) 6))) (* 1/3149280000 (pow (PI) 4)))))))> |
#<alt (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))> |
#<alt (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))> |
#<alt (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))> |
#<alt (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))> |
#<alt (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))> |
#<alt (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))> |
#<alt (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))> |
#<alt (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))> |
#<alt (* 1/32400 (* (pow angle 2) (pow (PI) 2)))> |
#<alt (* (pow angle 2) (+ (* -1/3149280000 (* (pow angle 2) (pow (PI) 4))) (* 1/32400 (pow (PI) 2))))> |
#<alt (* (pow angle 2) (+ (* 1/32400 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/3149280000 (pow (PI) 4)) (* 1/765275040000000 (* (pow angle 2) (pow (PI) 6)))))))> |
#<alt (* (pow angle 2) (+ (* 1/32400 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/3149280000 (pow (PI) 4)) (* (pow angle 2) (+ (* -1/347128758144000000000 (* (pow angle 2) (pow (PI) 8))) (* 1/765275040000000 (pow (PI) 6))))))))> |
#<alt (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))> |
#<alt (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))> |
#<alt (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))> |
#<alt (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))> |
#<alt (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))> |
#<alt (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))> |
#<alt (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))> |
#<alt (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))> |
#<alt (+ (* 1/16 (* (/ (* a (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))> |
#<alt (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))) (* a (+ (* 1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* 1/8 (* (* a (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (+ (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (sqrt (/ 1 (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))))> |
#<alt (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))) (* a (+ (* 1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* a (+ (* 1/8 (* (* a (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 (pow b 3)) (* 2 (pow b 3))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (* 1/4 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 (pow b 3)) (* 2 (pow b 3))) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (+ (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))) (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (+ (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))) (sqrt (/ 1 (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))))))> |
#<alt (* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))> |
#<alt (* a (+ (* 1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))) (* a (* x-scale y-scale))) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))))> |
#<alt (* a (+ (* 1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))) (* a (* x-scale y-scale))) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))))))) (pow a 2)) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))))> |
#<alt (* a (+ (* 1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))) (* a (* x-scale y-scale))) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 b) (* 2 b)) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (* 1/4 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 b) (* 2 b)) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))))))) (pow a 3)) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))))))) (pow a 2)) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))))))> |
#<alt (* -1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))> |
#<alt (* -1 (* a (+ (* -1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))) (* a (* x-scale y-scale))) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))))> |
#<alt (* -1 (* a (+ (* -1 (/ (+ (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))))))) a) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))) (* 1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))))) a)) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))))> |
#<alt (* -1 (* a (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 b) (* 2 b)) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (* 1/4 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 b) (* 2 b)) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))))))) a) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))) (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))))))) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) a)) (* 1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))))) a)) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))> |
#<alt (+ (* 1/16 (* (/ (* b (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))> |
#<alt (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* b (+ (* 1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* 1/8 (* (* b (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (+ (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (sqrt (/ 1 (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))))> |
#<alt (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* b (+ (* 1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* b (+ (* 1/8 (* (* b (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 (pow a 3)) (* 2 (pow a 3))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (* 1/4 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 (pow a 3)) (* 2 (pow a 3))) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (+ (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (+ (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (sqrt (/ 1 (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))))))> |
#<alt (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))> |
#<alt (* b (+ (* 1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))) (* b (* x-scale y-scale))) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))))> |
#<alt (* b (+ (* 1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))) (* b (* x-scale y-scale))) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))))))) (pow b 2)) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))))> |
#<alt (* b (+ (* 1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))) (* b (* x-scale y-scale))) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 a) (* 2 a)) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (* 1/4 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 a) (* 2 a)) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))))))) (pow b 3)) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))))))) (pow b 2)) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))))))> |
#<alt (* -1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))> |
#<alt (* -1 (* b (+ (* -1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))) (* b (* x-scale y-scale))) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))))> |
#<alt (* -1 (* b (+ (* -1 (/ (+ (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))))))) b) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (* 1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))))) b)) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))))> |
#<alt (* -1 (* b (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 a) (* 2 a)) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (* 1/4 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 a) (* 2 a)) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))))))) b) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))))))) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) b)) (* 1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))))) b)) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))))> |
#<alt (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))> |
#<alt (+ (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))> |
#<alt (+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))))> |
#<alt (+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))> |
#<alt (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))> |
#<alt (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))))> |
#<alt (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))) (pow x-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))))> |
#<alt (* -1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))> |
#<alt (* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))))> |
#<alt (* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))))> |
#<alt (* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))) (pow x-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))))))> |
#<alt (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))> |
#<alt (+ (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))> |
#<alt (+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))))> |
#<alt (+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))> |
#<alt (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))> |
#<alt (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))))> |
#<alt (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))) (pow y-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))))> |
#<alt (* -1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))> |
#<alt (* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))))> |
#<alt (* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))))> |
#<alt (* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))) (pow y-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))))))> |
#<alt (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))> |
#<alt (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))))))) (* b (sqrt 2)))) (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))))> |
#<alt (+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/2 (/ (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))))) (* b (sqrt 2)))))))> |
#<alt (+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))))) (* b (sqrt 2)))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow y-scale 2))) (+ (* -1/765275040000000 (/ (* (pow b 2) (pow (PI) 6)) (pow x-scale 2))) (+ (* 1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow x-scale 2))) (+ (* 1/765275040000000 (/ (* (pow b 2) (pow (PI) 6)) (pow y-scale 2))) (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))))) (+ (* 2 (* (- (+ (* -1/765275040000000 (/ (* (pow b 2) (pow (PI) 6)) (pow x-scale 2))) (* 1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow x-scale 2)))) (+ (* -1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow y-scale 2))) (* 1/765275040000000 (/ (* (pow b 2) (pow (PI) 6)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow (+ a b) 2) (* (+ (* 1/31886460000000 (pow (PI) 6)) (* 1/19131876000000 (pow (PI) 6))) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (* 1/2 (/ (* (pow x-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/2 (/ (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/2 (/ (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2)))))))) (* b (sqrt 2)))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))> |
#<alt (* 1/180 (* angle (PI)))> |
#<alt (* angle (+ (* -1/34992000 (* (pow angle 2) (pow (PI) 3))) (* 1/180 (PI))))> |
#<alt (* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* 1/22674816000000 (* (pow angle 2) (pow (PI) 5)))))))> |
#<alt (* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* (pow angle 2) (+ (* -1/30855889612800000000 (* (pow angle 2) (pow (PI) 7))) (* 1/22674816000000 (pow (PI) 5))))))))> |
#<alt (sin (* 1/180 (* angle (PI))))> |
#<alt (sin (* 1/180 (* angle (PI))))> |
#<alt (sin (* 1/180 (* angle (PI))))> |
#<alt (sin (* 1/180 (* angle (PI))))> |
#<alt (sin (* 1/180 (* angle (PI))))> |
#<alt (sin (* 1/180 (* angle (PI))))> |
#<alt (sin (* 1/180 (* angle (PI))))> |
#<alt (sin (* 1/180 (* angle (PI))))> |
#<alt (/ 2 (pow y-scale 2))> |
#<alt (+ (* -1/16200 (/ (* (pow angle 2) (pow (PI) 2)) (pow y-scale 2))) (* 2 (/ 1 (pow y-scale 2))))> |
#<alt (+ (* (pow angle 2) (+ (* -1/16200 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/1574640000 (/ (* (pow angle 2) (pow (PI) 4)) (pow y-scale 2))))) (* 2 (/ 1 (pow y-scale 2))))> |
#<alt (+ (* (pow angle 2) (+ (* -1/16200 (/ (pow (PI) 2) (pow y-scale 2))) (* (pow angle 2) (+ (* -1/382637520000000 (/ (* (pow angle 2) (pow (PI) 6)) (pow y-scale 2))) (* 1/1574640000 (/ (pow (PI) 4) (pow y-scale 2))))))) (* 2 (/ 1 (pow y-scale 2))))> |
#<alt (* 2 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow y-scale 2)))> |
#<alt (* 2 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow y-scale 2)))> |
#<alt (* 2 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow y-scale 2)))> |
#<alt (* 2 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow y-scale 2)))> |
#<alt (* 2 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow y-scale 2)))> |
#<alt (* 2 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow y-scale 2)))> |
#<alt (* 2 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow y-scale 2)))> |
#<alt (* 2 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow y-scale 2)))> |
#<alt (* 2 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow y-scale 2)))> |
#<alt (* 2 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow y-scale 2)))> |
#<alt (* 2 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow y-scale 2)))> |
#<alt (* 2 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow y-scale 2)))> |
#<alt (* 2 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow y-scale 2)))> |
#<alt (* 2 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow y-scale 2)))> |
#<alt (* 2 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow y-scale 2)))> |
#<alt (* 2 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow y-scale 2)))> |
#<alt (* 2 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow y-scale 2)))> |
#<alt (* 2 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow y-scale 2)))> |
#<alt (* 2 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow y-scale 2)))> |
#<alt (* 2 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow y-scale 2)))> |
#<alt (+ 1 (cos (* 1/90 (* angle (PI)))))> |
#<alt (+ 1 (cos (* 1/90 (* angle (PI)))))> |
#<alt (+ 1 (cos (* 1/90 (* angle (PI)))))> |
#<alt (+ 1 (cos (* 1/90 (* angle (PI)))))> |
#<alt (+ 1 (cos (* 1/90 (* angle (PI)))))> |
#<alt (+ 1 (cos (* 1/90 (* angle (PI)))))> |
#<alt (+ 1 (cos (* 1/90 (* angle (PI)))))> |
#<alt (+ 1 (cos (* 1/90 (* angle (PI)))))> |
#<alt (+ 1 (cos (* 1/90 (* angle (PI)))))> |
#<alt (+ 1 (cos (* 1/90 (* angle (PI)))))> |
#<alt (+ 1 (cos (* 1/90 (* angle (PI)))))> |
#<alt (+ 1 (cos (* 1/90 (* angle (PI)))))> |
#<alt 2> |
#<alt (+ 2 (* -1/16200 (* (pow angle 2) (pow (PI) 2))))> |
#<alt (+ 2 (* (pow angle 2) (+ (* -1/16200 (pow (PI) 2)) (* 1/1574640000 (* (pow angle 2) (pow (PI) 4))))))> |
#<alt (+ 2 (* (pow angle 2) (+ (* -1/16200 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/382637520000000 (* (pow angle 2) (pow (PI) 6))) (* 1/1574640000 (pow (PI) 4)))))))> |
#<alt (+ 1 (cos (* 1/90 (* angle (PI)))))> |
#<alt (+ 1 (cos (* 1/90 (* angle (PI)))))> |
#<alt (+ 1 (cos (* 1/90 (* angle (PI)))))> |
#<alt (+ 1 (cos (* 1/90 (* angle (PI)))))> |
#<alt (+ 1 (cos (* 1/90 (* angle (PI)))))> |
#<alt (+ 1 (cos (* 1/90 (* angle (PI)))))> |
#<alt (+ 1 (cos (* 1/90 (* angle (PI)))))> |
#<alt (+ 1 (cos (* 1/90 (* angle (PI)))))> |
#<alt (* 1/90 (* angle (PI)))> |
#<alt (* 1/90 (* angle (PI)))> |
#<alt (* 1/90 (* angle (PI)))> |
#<alt (* 1/90 (* angle (PI)))> |
#<alt (* 1/90 (* angle (PI)))> |
#<alt (* 1/90 (* angle (PI)))> |
#<alt (* 1/90 (* angle (PI)))> |
#<alt (* 1/90 (* angle (PI)))> |
#<alt (* 1/90 (* angle (PI)))> |
#<alt (* 1/90 (* angle (PI)))> |
#<alt (* 1/90 (* angle (PI)))> |
#<alt (* 1/90 (* angle (PI)))> |
#<alt (* b (sqrt 2))> |
#<alt (+ (* 1/2 (/ (* (pow angle 2) (* (sqrt 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))))) b)) (* b (sqrt 2)))> |
#<alt (+ (* b (sqrt 2)) (* (pow angle 2) (+ (* 1/2 (/ (* (sqrt 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) b)) (* 1/2 (/ (* (pow angle 2) (* (sqrt 2) (- (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (* 1/4 (/ (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2) (pow b 2)))))) b)))))> |
#<alt (+ (* b (sqrt 2)) (* (pow angle 2) (+ (* 1/2 (/ (* (sqrt 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) b)) (* (pow angle 2) (+ (* 1/2 (/ (* (sqrt 2) (- (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (* 1/4 (/ (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2) (pow b 2))))) b)) (* 1/2 (/ (* (pow angle 2) (* (sqrt 2) (- (+ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6))))) (* 1/2 (/ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (- (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (* 1/4 (/ (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2) (pow b 2))))) (pow b 2)))))) b)))))))> |
#<alt (* (sqrt 2) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))> |
#<alt (* (sqrt 2) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))> |
#<alt (* (sqrt 2) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))> |
#<alt (* (sqrt 2) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))> |
#<alt (* (sqrt 2) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))> |
#<alt (* (sqrt 2) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))> |
#<alt (* (sqrt 2) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))> |
#<alt (* (sqrt 2) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))> |
#<alt (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))> |
#<alt (+ (* 1/2 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (sqrt 2))) (* a (sin (* 1/180 (* angle (PI))))))) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))> |
#<alt (+ (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))) (* (pow b 2) (+ (* -1/8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (sqrt 2))) (* (pow a 3) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* 1/2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (sqrt 2)) (* a (sin (* 1/180 (* angle (PI))))))))))> |
#<alt (+ (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))) (* (pow b 2) (+ (* 1/2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (sqrt 2)) (* a (sin (* 1/180 (* angle (PI))))))) (* (pow b 2) (+ (* -1/8 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (sqrt 2)) (* (pow a 3) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* 1/16 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 6) (sqrt 2))) (* (pow a 5) (pow (sin (* 1/180 (* angle (PI)))) 5)))))))))> |
#<alt (* b (* (cos (* 1/180 (* angle (PI)))) (sqrt 2)))> |
#<alt (* b (+ (* 1/2 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 2))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* (cos (* 1/180 (* angle (PI)))) (sqrt 2))))> |
#<alt (* b (+ (* -1/8 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 2))) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/2 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 2))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* (cos (* 1/180 (* angle (PI)))) (sqrt 2)))))> |
#<alt (* b (+ (* -1/8 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 2))) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/16 (/ (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (sqrt 2))) (* (pow b 6) (pow (cos (* 1/180 (* angle (PI)))) 5)))) (+ (* 1/2 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 2))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* (cos (* 1/180 (* angle (PI)))) (sqrt 2))))))> |
#<alt (* -1 (* b (* (cos (* 1/180 (* angle (PI)))) (sqrt 2))))> |
#<alt (* -1 (* b (+ (* 1/2 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 2))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* (cos (* 1/180 (* angle (PI)))) (sqrt 2)))))> |
#<alt (* -1 (* b (+ (* -1/8 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 2))) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/2 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 2))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* (cos (* 1/180 (* angle (PI)))) (sqrt 2))))))> |
#<alt (* -1 (* b (+ (* -1/8 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 2))) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/16 (/ (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (sqrt 2))) (* (pow b 6) (pow (cos (* 1/180 (* angle (PI)))) 5)))) (+ (* 1/2 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 2))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* (cos (* 1/180 (* angle (PI)))) (sqrt 2)))))))> |
#<alt (* b (* (cos (* 1/180 (* angle (PI)))) (sqrt 2)))> |
#<alt (+ (* 1/2 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 2))) (* b (cos (* 1/180 (* angle (PI))))))) (* b (* (cos (* 1/180 (* angle (PI)))) (sqrt 2))))> |
#<alt (+ (* b (* (cos (* 1/180 (* angle (PI)))) (sqrt 2))) (* (pow a 2) (+ (* -1/8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 2))) (* (pow b 3) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (* 1/2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 2)) (* b (cos (* 1/180 (* angle (PI))))))))))> |
#<alt (+ (* b (* (cos (* 1/180 (* angle (PI)))) (sqrt 2))) (* (pow a 2) (+ (* 1/2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 2)) (* b (cos (* 1/180 (* angle (PI))))))) (* (pow a 2) (+ (* -1/8 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 2)) (* (pow b 3) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (* 1/16 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (sqrt 2))) (* (pow b 5) (pow (cos (* 1/180 (* angle (PI)))) 5)))))))))> |
#<alt (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))> |
#<alt (* a (+ (* 1/2 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (sqrt 2))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))> |
#<alt (* a (+ (* -1/8 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (sqrt 2))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/2 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (sqrt 2))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))> |
#<alt (* a (+ (* -1/8 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (sqrt 2))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/16 (/ (* (pow b 6) (* (pow (cos (* 1/180 (* angle (PI)))) 6) (sqrt 2))) (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 5)))) (+ (* 1/2 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (sqrt 2))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))> |
#<alt (* -1 (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))> |
#<alt (* -1 (* a (+ (* 1/2 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (sqrt 2))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))> |
#<alt (* -1 (* a (+ (* -1/8 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (sqrt 2))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/2 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (sqrt 2))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))> |
#<alt (* -1 (* a (+ (* -1/8 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (sqrt 2))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/16 (/ (* (pow b 6) (* (pow (cos (* 1/180 (* angle (PI)))) 6) (sqrt 2))) (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 5)))) (+ (* 1/2 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (sqrt 2))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))> |
#<alt (* 1/180 (* angle (PI)))> |
#<alt (* angle (+ (* -1/34992000 (* (pow angle 2) (pow (PI) 3))) (* 1/180 (PI))))> |
#<alt (* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* 1/22674816000000 (* (pow angle 2) (pow (PI) 5)))))))> |
#<alt (* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* (pow angle 2) (+ (* -1/30855889612800000000 (* (pow angle 2) (pow (PI) 7))) (* 1/22674816000000 (pow (PI) 5))))))))> |
#<alt (sin (* 1/180 (* angle (PI))))> |
#<alt (sin (* 1/180 (* angle (PI))))> |
#<alt (sin (* 1/180 (* angle (PI))))> |
#<alt (sin (* 1/180 (* angle (PI))))> |
#<alt (sin (* 1/180 (* angle (PI))))> |
#<alt (sin (* 1/180 (* angle (PI))))> |
#<alt (sin (* 1/180 (* angle (PI))))> |
#<alt (sin (* 1/180 (* angle (PI))))> |
#<alt 1> |
#<alt (+ 1 (* -1/32400 (* (pow angle 2) (pow (PI) 2))))> |
#<alt (+ 1 (* (pow angle 2) (+ (* -1/32400 (pow (PI) 2)) (* (pow angle 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))))> |
#<alt (+ 1 (* (pow angle 2) (+ (* -1/32400 (pow (PI) 2)) (* (pow angle 2) (+ (* 1/12597120000 (pow (PI) 4)) (+ (* 1/4199040000 (pow (PI) 4)) (* (pow angle 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6))))))))))> |
#<alt (pow (cos (* 1/180 (* angle (PI)))) 2)> |
#<alt (pow (cos (* 1/180 (* angle (PI)))) 2)> |
#<alt (pow (cos (* 1/180 (* angle (PI)))) 2)> |
#<alt (pow (cos (* 1/180 (* angle (PI)))) 2)> |
#<alt (pow (cos (* 1/180 (* angle (PI)))) 2)> |
#<alt (pow (cos (* 1/180 (* angle (PI)))) 2)> |
#<alt (pow (cos (* 1/180 (* angle (PI)))) 2)> |
#<alt (pow (cos (* 1/180 (* angle (PI)))) 2)> |
#<alt 1> |
#<alt (+ 1 (* -1/16200 (* (pow angle 2) (pow (PI) 2))))> |
#<alt (+ 1 (* (pow angle 2) (+ (* -1/16200 (pow (PI) 2)) (* 1/1574640000 (* (pow angle 2) (pow (PI) 4))))))> |
#<alt (+ 1 (* (pow angle 2) (+ (* -1/16200 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/382637520000000 (* (pow angle 2) (pow (PI) 6))) (* 1/1574640000 (pow (PI) 4)))))))> |
#<alt (cos (* 1/90 (* angle (PI))))> |
#<alt (cos (* 1/90 (* angle (PI))))> |
#<alt (cos (* 1/90 (* angle (PI))))> |
#<alt (cos (* 1/90 (* angle (PI))))> |
#<alt (cos (* 1/90 (* angle (PI))))> |
#<alt (cos (* 1/90 (* angle (PI))))> |
#<alt (cos (* 1/90 (* angle (PI))))> |
#<alt (cos (* 1/90 (* angle (PI))))> |
#<alt (* (/ (* b (sqrt 2)) y-scale) (sqrt (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))> |
#<alt (+ (* 1/2 (* (/ (* (pow a 2) (* y-scale (* (sqrt 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) b) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (* (/ (* b (sqrt 2)) y-scale) (sqrt (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))> |
#<alt (+ (* (/ (* b (sqrt 2)) y-scale) (sqrt (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 2) (+ (* -1/8 (* (/ (* (pow a 2) (* (pow y-scale 3) (* (sqrt 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (pow b 3)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 3))))) (* 1/2 (* (/ (* y-scale (* (sqrt 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) b) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))))))> |
#<alt (+ (* (/ (* b (sqrt 2)) y-scale) (sqrt (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 2) (+ (* 1/2 (* (/ (* y-scale (* (sqrt 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) b) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (* (pow a 2) (+ (* -1/8 (* (/ (* (pow y-scale 3) (* (sqrt 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (pow b 3)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 3))))) (* 1/16 (* (/ (* (pow a 2) (* (pow y-scale 5) (* (sqrt 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 3)))) (pow b 5)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 5))))))))))> |
#<alt (* (* a (sqrt 2)) (sqrt (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))> |
#<alt (* a (+ (* 1/2 (* (/ (* (pow b 2) (* (sqrt 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 2) (pow y-scale 2))) (sqrt (/ 1 (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (* (sqrt 2) (sqrt (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))))> |
#<alt (* a (+ (* -1/8 (* (/ (* (pow b 4) (* (sqrt 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2))) (* (pow a 4) (pow y-scale 4))) (sqrt (/ 1 (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 3))))) (+ (* 1/2 (* (/ (* (pow b 2) (* (sqrt 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 2) (pow y-scale 2))) (sqrt (/ 1 (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (* (sqrt 2) (sqrt (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))))> |
#<alt (* a (+ (* -1/8 (* (/ (* (pow b 4) (* (sqrt 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2))) (* (pow a 4) (pow y-scale 4))) (sqrt (/ 1 (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 3))))) (+ (* 1/16 (* (/ (* (pow b 6) (* (sqrt 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 3))) (* (pow a 6) (pow y-scale 6))) (sqrt (/ 1 (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 5))))) (+ (* 1/2 (* (/ (* (pow b 2) (* (sqrt 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 2) (pow y-scale 2))) (sqrt (/ 1 (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (* (sqrt 2) (sqrt (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))))))> |
#<alt (* -1 (* (* a (sqrt 2)) (sqrt (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))> |
#<alt (* -1 (* a (+ (* 1/2 (* (/ (* (pow b 2) (* (sqrt 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 2) (pow y-scale 2))) (sqrt (/ 1 (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (* (sqrt 2) (sqrt (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))))> |
#<alt (* -1 (* a (+ (* -1/8 (* (/ (* (pow b 4) (* (sqrt 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2))) (* (pow a 4) (pow y-scale 4))) (sqrt (/ 1 (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 3))))) (+ (* 1/2 (* (/ (* (pow b 2) (* (sqrt 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 2) (pow y-scale 2))) (sqrt (/ 1 (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (* (sqrt 2) (sqrt (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))))))> |
#<alt (* -1 (* a (+ (* -1/8 (* (/ (* (pow b 4) (* (sqrt 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2))) (* (pow a 4) (pow y-scale 4))) (sqrt (/ 1 (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 3))))) (+ (* 1/16 (* (/ (* (pow b 6) (* (sqrt 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 3))) (* (pow a 6) (pow y-scale 6))) (sqrt (/ 1 (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 5))))) (+ (* 1/2 (* (/ (* (pow b 2) (* (sqrt 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 2) (pow y-scale 2))) (sqrt (/ 1 (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (* (sqrt 2) (sqrt (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))))))> |
#<alt (/ (* a (sqrt 2)) y-scale)> |
#<alt (+ (* 1/2 (/ (* (pow angle 2) (* y-scale (* (sqrt 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))))) a)) (/ (* a (sqrt 2)) y-scale))> |
#<alt (+ (* (pow angle 2) (+ (* 1/2 (/ (* y-scale (* (sqrt 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) a)) (* 1/2 (/ (* (pow angle 2) (* y-scale (* (sqrt 2) (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2)))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 2))))))) a)))) (/ (* a (sqrt 2)) y-scale))> |
#<alt (+ (* (pow angle 2) (+ (* 1/2 (/ (* y-scale (* (sqrt 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) a)) (* (pow angle 2) (+ (* 1/2 (/ (* y-scale (* (sqrt 2) (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2)))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 2)))))) a)) (* 1/2 (/ (* (pow angle 2) (* y-scale (* (sqrt 2) (- (+ (* -1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow y-scale 2))) (* 1/765275040000000 (/ (* (pow b 2) (pow (PI) 6)) (pow y-scale 2)))) (* 1/2 (/ (* (pow y-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2)))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 2)))))) (pow a 2))))))) a)))))) (/ (* a (sqrt 2)) y-scale))> |
#<alt (* (sqrt 2) (sqrt (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))> |
#<alt (* (sqrt 2) (sqrt (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))> |
#<alt (* (sqrt 2) (sqrt (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))> |
#<alt (* (sqrt 2) (sqrt (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))> |
#<alt (* (sqrt 2) (sqrt (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))> |
#<alt (* (sqrt 2) (sqrt (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))> |
#<alt (* (sqrt 2) (sqrt (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))> |
#<alt (* (sqrt 2) (sqrt (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))> |
#<alt (* (/ (sqrt 2) y-scale) (sqrt (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))))> |
#<alt (* (/ (sqrt 2) y-scale) (sqrt (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))))> |
#<alt (* (/ (sqrt 2) y-scale) (sqrt (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))))> |
#<alt (* (/ (sqrt 2) y-scale) (sqrt (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))))> |
#<alt (* (/ (sqrt 2) y-scale) (sqrt (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))))> |
#<alt (* (/ (sqrt 2) y-scale) (sqrt (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))))> |
#<alt (* (/ (sqrt 2) y-scale) (sqrt (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))))> |
#<alt (* (/ (sqrt 2) y-scale) (sqrt (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))))> |
#<alt (* -1 (* (/ (sqrt 2) y-scale) (sqrt (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))))> |
#<alt (* -1 (* (/ (sqrt 2) y-scale) (sqrt (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))))> |
#<alt (* -1 (* (/ (sqrt 2) y-scale) (sqrt (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))))> |
#<alt (* -1 (* (/ (sqrt 2) y-scale) (sqrt (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))))> |
#<alt (* (/ (* a (sqrt 2)) y-scale) (sqrt (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))> |
#<alt (+ (* 1/2 (* (/ (* (pow b 2) (* y-scale (* (sqrt 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) a) (sqrt (/ 1 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (* (/ (* a (sqrt 2)) y-scale) (sqrt (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))> |
#<alt (+ (* (/ (* a (sqrt 2)) y-scale) (sqrt (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow b 2) (+ (* -1/8 (* (/ (* (pow b 2) (* (pow y-scale 3) (* (sqrt 2) (pow (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (pow a 3)) (sqrt (/ 1 (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 3))))) (* 1/2 (* (/ (* y-scale (* (sqrt 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) a) (sqrt (/ 1 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))> |
#<alt (+ (* (/ (* a (sqrt 2)) y-scale) (sqrt (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow b 2) (+ (* 1/2 (* (/ (* y-scale (* (sqrt 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) a) (sqrt (/ 1 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (* (pow b 2) (+ (* -1/8 (* (/ (* (pow y-scale 3) (* (sqrt 2) (pow (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (pow a 3)) (sqrt (/ 1 (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 3))))) (* 1/16 (* (/ (* (pow b 2) (* (pow y-scale 5) (* (sqrt 2) (pow (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 3)))) (pow a 5)) (sqrt (/ 1 (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 5))))))))))> |
#<alt (* (* b (sqrt 2)) (sqrt (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))> |
#<alt (* b (+ (* 1/2 (* (/ (* (pow a 2) (* (sqrt 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow b 2) (pow y-scale 2))) (sqrt (/ 1 (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (* (sqrt 2) (sqrt (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))))> |
#<alt (* b (+ (* -1/8 (* (/ (* (pow a 4) (* (sqrt 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2))) (* (pow b 4) (pow y-scale 4))) (sqrt (/ 1 (pow (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 3))))) (+ (* 1/2 (* (/ (* (pow a 2) (* (sqrt 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow b 2) (pow y-scale 2))) (sqrt (/ 1 (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (* (sqrt 2) (sqrt (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))))> |
#<alt (* b (+ (* -1/8 (* (/ (* (pow a 4) (* (sqrt 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2))) (* (pow b 4) (pow y-scale 4))) (sqrt (/ 1 (pow (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 3))))) (+ (* 1/16 (* (/ (* (pow a 6) (* (sqrt 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 3))) (* (pow b 6) (pow y-scale 6))) (sqrt (/ 1 (pow (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 5))))) (+ (* 1/2 (* (/ (* (pow a 2) (* (sqrt 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow b 2) (pow y-scale 2))) (sqrt (/ 1 (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (* (sqrt 2) (sqrt (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))))))> |
#<alt (* -1 (* (* b (sqrt 2)) (sqrt (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))> |
#<alt (* -1 (* b (+ (* 1/2 (* (/ (* (pow a 2) (* (sqrt 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow b 2) (pow y-scale 2))) (sqrt (/ 1 (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (* (sqrt 2) (sqrt (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))))> |
#<alt (* -1 (* b (+ (* -1/8 (* (/ (* (pow a 4) (* (sqrt 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2))) (* (pow b 4) (pow y-scale 4))) (sqrt (/ 1 (pow (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 3))))) (+ (* 1/2 (* (/ (* (pow a 2) (* (sqrt 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow b 2) (pow y-scale 2))) (sqrt (/ 1 (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (* (sqrt 2) (sqrt (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))))))> |
#<alt (* -1 (* b (+ (* -1/8 (* (/ (* (pow a 4) (* (sqrt 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2))) (* (pow b 4) (pow y-scale 4))) (sqrt (/ 1 (pow (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 3))))) (+ (* 1/16 (* (/ (* (pow a 6) (* (sqrt 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 3))) (* (pow b 6) (pow y-scale 6))) (sqrt (/ 1 (pow (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 5))))) (+ (* 1/2 (* (/ (* (pow a 2) (* (sqrt 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow b 2) (pow y-scale 2))) (sqrt (/ 1 (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (* (sqrt 2) (sqrt (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))))))> |
#<alt (* 1/4 (* (* (sqrt 2) (sqrt 8)) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))> |
#<alt (+ (* 1/8 (* (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* 1/4 (* (* (sqrt 2) (sqrt 8)) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))> |
#<alt (+ (* 1/8 (* (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* 1/4 (* (* (sqrt 2) (sqrt 8)) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))> |
#<alt (+ (* 1/8 (* (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* 1/4 (* (* (sqrt 2) (sqrt 8)) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))> |
#<alt (* 1/8 (* (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))> |
#<alt (* (pow y-scale 2) (+ (* 1/8 (* (/ (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* 1/4 (* (/ (* (sqrt 2) (sqrt 8)) (pow y-scale 2)) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))> |
#<alt (* (pow y-scale 2) (+ (* 1/8 (* (/ (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* 1/4 (* (/ (* (sqrt 2) (sqrt 8)) (pow y-scale 2)) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))> |
#<alt (* (pow y-scale 2) (+ (* 1/8 (* (/ (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* 1/4 (* (/ (* (sqrt 2) (sqrt 8)) (pow y-scale 2)) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))> |
#<alt (* -1/8 (* (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))> |
#<alt (* (pow y-scale 2) (+ (* -1/4 (* (/ (* (sqrt 2) (sqrt 8)) (pow y-scale 2)) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* -1/8 (* (/ (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))> |
#<alt (* (pow y-scale 2) (+ (* -1/4 (* (/ (* (sqrt 2) (sqrt 8)) (pow y-scale 2)) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* -1/8 (* (/ (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))> |
#<alt (* (pow y-scale 2) (+ (* -1/4 (* (/ (* (sqrt 2) (sqrt 8)) (pow y-scale 2)) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* -1/8 (* (/ (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))> |
#<alt (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (* 1/4 (* a (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))> |
#<alt (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (+ (* 1/4 (* a (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* b (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))))))) (* (pow a 3) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))))))> |
#<alt (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (+ (* 1/4 (* a (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* b (+ (* 1/4 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))))) (* (pow a 3) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (* b (+ (* 1/8 (+ (* -1/2 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow a 3) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 3))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))))) (* 1/8 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))) (* a (cos (* 1/180 (* angle (PI)))))))))))))> |
#<alt (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (+ (* 1/4 (* a (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* b (+ (* 1/4 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))))) (* (pow a 3) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (* b (+ (* 1/8 (* b (+ (* -1 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))))) (* (pow a 5) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 3))))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (pow a 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))))))) (+ (* 1/8 (+ (* -1/2 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow a 3) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 3))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))))) (* 1/8 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))) (* a (cos (* 1/180 (* angle (PI))))))))))))))> |
#<alt (* b (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))> |
#<alt (* b (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))))))> |
#<alt (* b (+ (* 1/8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (* (pow b 2) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/8 (/ (+ (* -1/2 (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (pow b 2))) (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))))))))> |
#<alt (* b (+ (* 1/8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (* (pow b 2) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/8 (/ (+ (* -1 (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 a) (* 2 a))))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* 4 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (+ (* -2 a) (* 2 a)))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (pow b 3))) (+ (* 1/8 (/ (+ (* -1/2 (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (pow b 2))) (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))))))))))> |
#<alt (* -1 (* b (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))> |
#<alt (* -1 (* b (+ (* -1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))> |
#<alt (* -1 (* b (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/8 (+ (* -1/2 (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (sin (* 1/180 (* angle (PI))))))) b)) (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) b)) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))> |
#<alt (* -1 (* b (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (/ (+ (* -1 (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 a) (* 2 a))))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* 4 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (+ (* -2 a) (* 2 a)))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) b)) (+ (* 1/8 (+ (* -1/2 (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (sin (* 1/180 (* angle (PI)))))))) b)) (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) b)) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))> |
#<alt (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (pow b 2)) (pow b 2))))) (* a (pow x-scale 2)))) (* 1/4 (* a (* (sqrt 2) (sqrt 8)))))> |
#<alt (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (pow b 2)) (pow b 2))))) (* a (pow x-scale 2)))) (+ (* 1/4 (* a (* (sqrt 2) (sqrt 8)))) (* (pow angle 2) (+ (* 1/8 (+ (* -1/2 (/ (* (pow y-scale 4) (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1 (pow b 2)) (pow b 2)) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))))) (* (pow a 3) (pow x-scale 2)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))))))) (* a (pow x-scale 2))))) (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 2) (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))))) a))))))> |
#<alt (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (pow b 2)) (pow b 2))))) (* a (pow x-scale 2)))) (+ (* 1/4 (* a (* (sqrt 2) (sqrt 8)))) (* (pow angle 2) (+ (* 1/8 (+ (* -1/2 (/ (* (pow y-scale 4) (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1 (pow b 2)) (pow b 2)) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))))) (* (pow a 3) (pow x-scale 2)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))))))) (* a (pow x-scale 2))))) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 2) (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))))) a)) (* (pow angle 2) (+ (* 1/8 (+ (* -1/2 (/ (* a (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (+ (* 1/4 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (/ (* (pow y-scale 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (pow a 4)))) (+ (* -1 (pow b 2)) (pow b 2)))))) (pow x-scale 2))) (+ (* -1/2 (/ (* (pow y-scale 4) (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2))))))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))))) (* (pow a 3) (pow x-scale 2)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (+ (* (pow b 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 2))))) (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))))) (pow a 2)) (+ (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))) (pow a 2))) (/ (* (pow y-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))) (pow a 2))))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))) (* a (pow x-scale 2)))))) (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 2) (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 2))))))) a)))))))))> |
#<alt (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (pow b 2)) (pow b 2))))) (* a (pow x-scale 2)))) (+ (* 1/4 (* a (* (sqrt 2) (sqrt 8)))) (* (pow angle 2) (+ (* 1/8 (+ (* -1/2 (/ (* (pow y-scale 4) (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1 (pow b 2)) (pow b 2)) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))))) (* (pow a 3) (pow x-scale 2)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))))))) (* a (pow x-scale 2))))) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 2) (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))))) a)) (* (pow angle 2) (+ (* 1/8 (+ (* -1/2 (/ (* a (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (+ (* 1/4 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (/ (* (pow y-scale 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (pow a 4)))) (+ (* -1 (pow b 2)) (pow b 2)))))) (pow x-scale 2))) (+ (* -1/2 (/ (* (pow y-scale 4) (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2))))))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))))) (* (pow a 3) (pow x-scale 2)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (+ (* (pow b 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 2))))) (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))))) (pow a 2)) (+ (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))) (pow a 2))) (/ (* (pow y-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))) (pow a 2))))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))) (* a (pow x-scale 2)))))) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 2) (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 2))))))) a)) (* (pow angle 2) (+ (* 1/8 (+ (* -1/2 (/ (* a (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1 (/ (* (pow y-scale 2) (* (+ (* -1 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (/ (* (pow y-scale 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (pow a 4))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2))) (+ (* -1 (/ (* (pow y-scale 6) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))) (pow a 6))) (+ (* 1/2 (/ (* (pow y-scale 2) (* (+ (* -1 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (+ (* 1/4 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (/ (* (pow y-scale 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (pow a 4)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2))) (/ (* (pow y-scale 4) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (pow a 4))))) (+ (* -1 (pow b 2)) (pow b 2)))))) (pow x-scale 2))) (+ (* -1/2 (/ (* a (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (+ (* 1/4 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (/ (* (pow y-scale 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (pow a 4)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2))))))))))) (pow x-scale 2))) (+ (* -1/2 (/ (* (pow y-scale 4) (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (+ (* (pow b 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 2))))) (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))))) (pow a 2)) (+ (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))) (pow a 2))) (/ (* (pow y-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))) (pow a 2))))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))))))) (* (pow a 3) (pow x-scale 2)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (+ (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (+ (* (pow b 2) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))))) (pow y-scale 2)))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- b a) 2)))) (pow y-scale 2))) (/ (* (pow (+ a b) 2) (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- b a) 2))) (pow y-scale 2))))))) (pow a 2)) (+ (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))))) (pow a 2))) (+ (/ (* (pow y-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (+ (* (pow b 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 2))))) (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))))) (pow a 2)) (+ (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))) (pow a 2))) (/ (* (pow y-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))) (pow a 2)))))) (pow a 2)) (/ (* (pow y-scale 2) (* (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))) (pow a 2)))))) (+ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6))))))))) (* a (pow x-scale 2))))))) (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 2) (* (sqrt 8) (- (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 2)))))) (pow a 2))))))) a))))))))))))> |
#<alt (+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))> |
#<alt (+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))> |
#<alt (+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))> |
#<alt (+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))> |
#<alt (+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))> |
#<alt (+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))> |
#<alt (+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))> |
#<alt (+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))> |
#<alt (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/4 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))> |
#<alt (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (+ (* 1/4 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* a (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))))))) (* (pow b 3) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))))))> |
#<alt (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (+ (* 1/4 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* a (+ (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))))) (* (pow b 3) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* a (+ (* 1/8 (+ (* -1/2 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow b 3) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))))) (* 1/8 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))) (* b (sin (* 1/180 (* angle (PI)))))))))))))> |
#<alt (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (+ (* 1/4 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* a (+ (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))))) (* (pow b 3) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* a (+ (* 1/8 (* a (+ (* -1 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))))) (* (pow b 5) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (pow b 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))))))) (+ (* 1/8 (+ (* -1/2 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow b 3) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))))) (* 1/8 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))) (* b (sin (* 1/180 (* angle (PI))))))))))))))> |
#<alt (* a (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))> |
#<alt (* a (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (+ (* 1/4 (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))))))> |
#<alt (* a (+ (* 1/8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (* (pow a 2) (cos (* 1/180 (* angle (PI))))))) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (+ (* 1/8 (/ (+ (* -1/2 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/4 (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))))))))> |
#<alt (* a (+ (* 1/8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (* (pow a 2) (cos (* 1/180 (* angle (PI))))))) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (+ (* 1/8 (/ (+ (* -1 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 b) (* 2 b))))))) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* 4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (+ (* -2 b) (* 2 b)))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (pow a 3))) (+ (* 1/8 (/ (+ (* -1/2 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/4 (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))))))))))> |
#<alt (* -1 (* a (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))> |
#<alt (* -1 (* a (+ (* -1/4 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))> |
#<alt (* -1 (* a (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/8 (+ (* -1/2 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (* 1/8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (cos (* 1/180 (* angle (PI))))))) a)) (* 1/4 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) a)) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))> |
#<alt (* -1 (* a (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (/ (+ (* -1 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 b) (* 2 b))))))) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* 4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (+ (* -2 b) (* 2 b)))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) a)) (+ (* 1/8 (+ (* -1/2 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (* 1/8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (cos (* 1/180 (* angle (PI)))))))) a)) (* 1/4 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) a)) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))> |
#<alt (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))> |
#<alt (/ (+ (* 1/8 (* (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* (pow x-scale 2) (* y-scale (* (sqrt 2) (sqrt 8)))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow x-scale 2))> |
#<alt (/ (+ (* 1/8 (* (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* (pow x-scale 2) (* y-scale (* (sqrt 2) (sqrt 8)))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow x-scale 2))> |
#<alt (/ (+ (* 1/8 (* (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* (pow x-scale 2) (* y-scale (* (sqrt 2) (sqrt 8)))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow x-scale 2))> |
#<alt (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))> |
#<alt (+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))> |
#<alt (+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))> |
#<alt (+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))> |
#<alt (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))> |
#<alt (+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))> |
#<alt (+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))> |
#<alt (+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))> |
#<alt (* 2 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))> |
#<alt (* 2 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))> |
#<alt (* 2 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))> |
#<alt (* 2 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))> |
#<alt (* 2 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))> |
#<alt (* 2 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))> |
#<alt (* 2 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))> |
#<alt (* 2 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))> |
#<alt (* 2 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))> |
#<alt (* 2 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))> |
#<alt (* 2 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))> |
#<alt (* 2 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))> |
#<alt 2> |
#<alt (+ 2 (* -1/16200 (* (pow angle 2) (pow (PI) 2))))> |
#<alt (+ 2 (* (pow angle 2) (+ (* -1/16200 (pow (PI) 2)) (* 1/1574640000 (* (pow angle 2) (pow (PI) 4))))))> |
#<alt (+ 2 (* (pow angle 2) (+ (* -1/16200 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/382637520000000 (* (pow angle 2) (pow (PI) 6))) (* 1/1574640000 (pow (PI) 4)))))))> |
#<alt (* 2 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))> |
#<alt (* 2 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))> |
#<alt (* 2 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))> |
#<alt (* 2 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))> |
#<alt (* 2 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))> |
#<alt (* 2 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))> |
#<alt (* 2 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))> |
#<alt (* 2 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))> |
#<alt (+ (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))> |
#<alt (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))))> |
#<alt (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))))))> |
#<alt (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))> |
#<alt (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))> |
#<alt (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))))> |
#<alt (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))))> |
#<alt (* -1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))> |
#<alt (* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))))> |
#<alt (* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))))> |
#<alt (* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))> |
#<alt (+ (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))> |
#<alt (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))))> |
#<alt (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))))))> |
#<alt (* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))> |
#<alt (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))> |
#<alt (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))> |
#<alt (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))))> |
#<alt (* -1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))> |
#<alt (* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))> |
#<alt (* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))))> |
#<alt (* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))))> |
#<alt (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))> |
#<alt (+ (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))> |
#<alt (+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))))> |
#<alt (+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))> |
#<alt (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))> |
#<alt (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))> |
#<alt (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))))> |
#<alt (* -1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))> |
#<alt (* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))> |
#<alt (* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))))> |
#<alt (* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))))> |
#<alt (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))> |
#<alt (+ (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))> |
#<alt (+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))))> |
#<alt (+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))> |
#<alt (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))> |
#<alt (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))> |
#<alt (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))))> |
#<alt (* -1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))> |
#<alt (* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))> |
#<alt (* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))))> |
#<alt (* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))))> |
#<alt (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))> |
#<alt (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))))))) (* b (sqrt 2)))) (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))))> |
#<alt (+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))))) (* b (sqrt 2)))))))> |
#<alt (+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))))) (* b (sqrt 2)))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))))) (* 1/2 (/ (* (pow x-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2)))))))) (* b (sqrt 2)))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))> |
#<alt 1> |
#<alt (+ 1 (* -1/16200 (* (pow angle 2) (pow (PI) 2))))> |
#<alt (+ 1 (* (pow angle 2) (+ (* -1/16200 (pow (PI) 2)) (* 1/1574640000 (* (pow angle 2) (pow (PI) 4))))))> |
#<alt (+ 1 (* (pow angle 2) (+ (* -1/16200 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/382637520000000 (* (pow angle 2) (pow (PI) 6))) (* 1/1574640000 (pow (PI) 4)))))))> |
#<alt (cos (* 1/90 (* angle (PI))))> |
#<alt (cos (* 1/90 (* angle (PI))))> |
#<alt (cos (* 1/90 (* angle (PI))))> |
#<alt (cos (* 1/90 (* angle (PI))))> |
#<alt (cos (* 1/90 (* angle (PI))))> |
#<alt (cos (* 1/90 (* angle (PI))))> |
#<alt (cos (* 1/90 (* angle (PI))))> |
#<alt (cos (* 1/90 (* angle (PI))))> |
225 calls:
| Time | Variable | Point | Expression | |
|---|---|---|---|---|
| 12.0ms | angle | @ | inf | (+ (/ (* (* a a) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale)) (/ (* (* b b) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale))) |
| 3.0ms | b | @ | 0 | (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) |
| 2.0ms | angle | @ | inf | (+ (* 1/2 (* (* y-scale y-scale) (/ (* 2 (* (+ (* 1/2 (cos (* 2 (* 1/180 (* angle (PI)))))) 1/2) (/ (+ 1/2 (* -1/2 (cos (* 2 (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ 1/2 (* -1/2 (cos (* 2 (* 1/180 (* angle (PI)))))))))) (+ (* 1/2 (cos (* 2 (* 1/180 (* angle (PI)))))) 1/2)) |
| 2.0ms | a | @ | inf | (sqrt (* 2 (+ (/ (* (* a a) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale)) (/ (* (* b b) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale))))) |
| 2.0ms | b | @ | inf | (sqrt (* 2 (+ (/ (* (* a a) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale)) (/ (* (* b b) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale))))) |
| 1× | egg-herbie |
| 9 070× | lower-*.f64 |
| 9 070× | lower-*.f32 |
| 3 392× | lower-+.f64 |
| 3 392× | lower-+.f32 |
| 3 348× | lower-fma.f64 |
Useful iterations: 0 (0.0ms)
| Iter | Nodes | Cost |
|---|---|---|
| 0 | 3043 | 252407 |
| 0 | 8178 | 247500 |
| 1× | iter limit |
| 1× | node limit |
| Inputs |
|---|
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(+ (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))))) |
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) |
(* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))) |
(* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) |
(* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))))) |
(* -1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) |
(* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) |
(* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))))) |
(* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(+ (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))))) |
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) |
(* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) |
(* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) |
(* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))) |
(* -1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) |
(* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) |
(* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))) |
(* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))))) |
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) |
(+ (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) |
(+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))) |
(+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) |
(* -1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) |
(* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) |
(* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))))) |
(* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) |
(+ (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) |
(+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))) |
(+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) |
(* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) |
(* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) |
(* -1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) |
(* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) |
(* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))))) |
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) |
(+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))))))) (* b (sqrt 2)))) (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))) |
(+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))))) (* b (sqrt 2))))))) |
(+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))))) (* b (sqrt 2)))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))))) (* 1/2 (/ (* (pow x-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2)))))))) (* b (sqrt 2))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) |
(+ (* 1/8 (/ (* (pow angle 2) (* y-scale (* (sqrt 2) (* (sqrt 8) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))))))) b)) (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))) |
(+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* y-scale (* (sqrt 2) (* (sqrt 8) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))))) b)) (* 1/8 (/ (* (pow angle 2) (* y-scale (* (sqrt 2) (* (sqrt 8) (- (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (* 1/4 (/ (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2) (pow b 2)))))))) b))))) |
(+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* y-scale (* (sqrt 2) (* (sqrt 8) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))))) b)) (* (pow angle 2) (+ (* 1/8 (/ (* y-scale (* (sqrt 2) (* (sqrt 8) (- (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (* 1/4 (/ (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2) (pow b 2))))))) b)) (* 1/8 (/ (* (pow angle 2) (* y-scale (* (sqrt 2) (* (sqrt 8) (- (+ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6))))) (* 1/2 (/ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (- (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (* 1/4 (/ (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2) (pow b 2))))) (pow b 2)))))))) b))))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(+ (* 1/8 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* a (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))) |
(+ (* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (* (pow b 2) (+ (* -1/32 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow a 3) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* 1/8 (/ (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (* a (sin (* 1/180 (* angle (PI)))))))))) |
(+ (* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (* (pow b 2) (+ (* 1/8 (/ (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (* a (sin (* 1/180 (* angle (PI))))))) (* (pow b 2) (+ (* -1/32 (/ (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8)))) (* (pow a 3) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* 1/64 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 6) (* (sqrt 2) (sqrt 8))))) (* (pow a 5) (pow (sin (* 1/180 (* angle (PI)))) 5))))))))) |
(* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(* b (+ (* 1/8 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))) |
(* b (+ (* -1/32 (/ (* (pow a 4) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/8 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))) |
(* b (+ (* -1/32 (/ (* (pow a 4) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/64 (/ (* (pow a 6) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 6) (* (sqrt 2) (sqrt 8))))) (* (pow b 6) (pow (cos (* 1/180 (* angle (PI)))) 5)))) (+ (* 1/8 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))) |
(* -1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(* -1 (* b (+ (* 1/8 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))) |
(* -1 (* b (+ (* -1/32 (/ (* (pow a 4) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/8 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))) |
(* -1 (* b (+ (* -1/32 (/ (* (pow a 4) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/64 (/ (* (pow a 6) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 6) (* (sqrt 2) (sqrt 8))))) (* (pow b 6) (pow (cos (* 1/180 (* angle (PI)))) 5)))) (+ (* 1/8 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))))) |
(* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(+ (* 1/8 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* b (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))) |
(+ (* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (* (pow a 2) (+ (* -1/32 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow b 3) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (* 1/8 (/ (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (* b (cos (* 1/180 (* angle (PI)))))))))) |
(+ (* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (* (pow a 2) (+ (* 1/8 (/ (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (* b (cos (* 1/180 (* angle (PI))))))) (* (pow a 2) (+ (* -1/32 (/ (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8)))) (* (pow b 3) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (* 1/64 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 6) (* (sqrt 2) (sqrt 8))))) (* (pow b 5) (pow (cos (* 1/180 (* angle (PI)))) 5))))))))) |
(* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(* a (+ (* 1/8 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))) |
(* a (+ (* -1/32 (/ (* (pow b 4) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/8 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))) |
(* a (+ (* -1/32 (/ (* (pow b 4) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/64 (/ (* (pow b 6) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 6) (* (sqrt 2) (sqrt 8))))) (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 5)))) (+ (* 1/8 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))) |
(* -1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(* -1 (* a (+ (* 1/8 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))) |
(* -1 (* a (+ (* -1/32 (/ (* (pow b 4) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/8 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))) |
(* -1 (* a (+ (* -1/32 (/ (* (pow b 4) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/64 (/ (* (pow b 6) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 6) (* (sqrt 2) (sqrt 8))))) (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 5)))) (+ (* 1/8 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))))) |
(* 1/4 (* y-scale (sqrt 8))) |
(* 1/4 (* y-scale (sqrt 8))) |
(* 1/4 (* y-scale (sqrt 8))) |
(* 1/4 (* y-scale (sqrt 8))) |
(* 1/4 (* y-scale (sqrt 8))) |
(* 1/4 (* y-scale (sqrt 8))) |
(* 1/4 (* y-scale (sqrt 8))) |
(* 1/4 (* y-scale (sqrt 8))) |
(* 1/4 (* y-scale (sqrt 8))) |
(* 1/4 (* y-scale (sqrt 8))) |
(* 1/4 (* y-scale (sqrt 8))) |
(* 1/4 (* y-scale (sqrt 8))) |
(* y-scale (sqrt 8)) |
(* y-scale (sqrt 8)) |
(* y-scale (sqrt 8)) |
(* y-scale (sqrt 8)) |
(* y-scale (sqrt 8)) |
(* y-scale (sqrt 8)) |
(* y-scale (sqrt 8)) |
(* y-scale (sqrt 8)) |
(* y-scale (sqrt 8)) |
(* y-scale (sqrt 8)) |
(* y-scale (sqrt 8)) |
(* y-scale (sqrt 8)) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(+ (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))))) |
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) |
(* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))) |
(* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) |
(* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))))) |
(* -1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) |
(* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) |
(* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))))) |
(* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(+ (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))))) |
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) |
(* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) |
(* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) |
(* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))) |
(* -1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) |
(* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) |
(* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))) |
(* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))))) |
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) |
(+ (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) |
(+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))) |
(+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) |
(* -1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) |
(* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) |
(* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))))) |
(* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) |
(+ (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) |
(+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))) |
(+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) |
(* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) |
(* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) |
(* -1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) |
(* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) |
(* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))))) |
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) |
(+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))))))) (* b (sqrt 2)))) (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))) |
(+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))))) (* b (sqrt 2))))))) |
(+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))))) (* b (sqrt 2)))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))))) (* 1/2 (/ (* (pow x-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2)))))))) (* b (sqrt 2))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(* b y-scale) |
(* b y-scale) |
(* b y-scale) |
(* b y-scale) |
(* b y-scale) |
(* b y-scale) |
(* b y-scale) |
(* b y-scale) |
(* b y-scale) |
(* b y-scale) |
(* b y-scale) |
(* b y-scale) |
(* b y-scale) |
(* b y-scale) |
(* b y-scale) |
(* b y-scale) |
(* b y-scale) |
(* b y-scale) |
(* b y-scale) |
(* b y-scale) |
(* b y-scale) |
(* b y-scale) |
(* b y-scale) |
(* b y-scale) |
(* b y-scale) |
(* b y-scale) |
(* b y-scale) |
(* b y-scale) |
(* b y-scale) |
(* b y-scale) |
(* b y-scale) |
(* b y-scale) |
(* b y-scale) |
(* b y-scale) |
(* b y-scale) |
(* b y-scale) |
(* b y-scale) |
(* b y-scale) |
(* b y-scale) |
(* b y-scale) |
(* b y-scale) |
(* b y-scale) |
(* b y-scale) |
(* b y-scale) |
(* b y-scale) |
(* b y-scale) |
(* b y-scale) |
(* b y-scale) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(+ (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))))) |
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) |
(* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))) |
(* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) |
(* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))))) |
(* -1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) |
(* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) |
(* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))))) |
(* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(+ (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))))) |
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) |
(* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) |
(* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) |
(* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))) |
(* -1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) |
(* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) |
(* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))) |
(* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))))) |
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) |
(+ (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) |
(+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))) |
(+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) |
(* -1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) |
(* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) |
(* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))))) |
(* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) |
(+ (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) |
(+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))) |
(+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) |
(* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) |
(* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) |
(* -1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) |
(* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) |
(* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))))) |
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) |
(+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))))))) (* b (sqrt 2)))) (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))) |
(+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))))) (* b (sqrt 2))))))) |
(+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))))) (* b (sqrt 2)))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))))) (* 1/2 (/ (* (pow x-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2)))))))) (* b (sqrt 2))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) |
(+ (* 1/8 (/ (* (pow angle 2) (* y-scale (* (sqrt 2) (* (sqrt 8) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))))))) b)) (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))) |
(+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* y-scale (* (sqrt 2) (* (sqrt 8) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))))) b)) (* 1/8 (/ (* (pow angle 2) (* y-scale (* (sqrt 2) (* (sqrt 8) (- (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (* 1/4 (/ (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2) (pow b 2)))))))) b))))) |
(+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* y-scale (* (sqrt 2) (* (sqrt 8) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))))) b)) (* (pow angle 2) (+ (* 1/8 (/ (* y-scale (* (sqrt 2) (* (sqrt 8) (- (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (* 1/4 (/ (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2) (pow b 2))))))) b)) (* 1/8 (/ (* (pow angle 2) (* y-scale (* (sqrt 2) (* (sqrt 8) (- (+ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6))))) (* 1/2 (/ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (- (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (* 1/4 (/ (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2) (pow b 2))))) (pow b 2)))))))) b))))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(+ (* 1/8 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* a (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))) |
(+ (* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (* (pow b 2) (+ (* -1/32 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow a 3) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* 1/8 (/ (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (* a (sin (* 1/180 (* angle (PI)))))))))) |
(+ (* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (* (pow b 2) (+ (* 1/8 (/ (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (* a (sin (* 1/180 (* angle (PI))))))) (* (pow b 2) (+ (* -1/32 (/ (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8)))) (* (pow a 3) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* 1/64 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 6) (* (sqrt 2) (sqrt 8))))) (* (pow a 5) (pow (sin (* 1/180 (* angle (PI)))) 5))))))))) |
(* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(* b (+ (* 1/8 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))) |
(* b (+ (* -1/32 (/ (* (pow a 4) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/8 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))) |
(* b (+ (* -1/32 (/ (* (pow a 4) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/64 (/ (* (pow a 6) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 6) (* (sqrt 2) (sqrt 8))))) (* (pow b 6) (pow (cos (* 1/180 (* angle (PI)))) 5)))) (+ (* 1/8 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))) |
(* -1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(* -1 (* b (+ (* 1/8 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))) |
(* -1 (* b (+ (* -1/32 (/ (* (pow a 4) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/8 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))) |
(* -1 (* b (+ (* -1/32 (/ (* (pow a 4) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/64 (/ (* (pow a 6) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 6) (* (sqrt 2) (sqrt 8))))) (* (pow b 6) (pow (cos (* 1/180 (* angle (PI)))) 5)))) (+ (* 1/8 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))))) |
(* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(+ (* 1/8 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* b (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))) |
(+ (* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (* (pow a 2) (+ (* -1/32 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow b 3) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (* 1/8 (/ (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (* b (cos (* 1/180 (* angle (PI)))))))))) |
(+ (* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (* (pow a 2) (+ (* 1/8 (/ (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (* b (cos (* 1/180 (* angle (PI))))))) (* (pow a 2) (+ (* -1/32 (/ (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8)))) (* (pow b 3) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (* 1/64 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 6) (* (sqrt 2) (sqrt 8))))) (* (pow b 5) (pow (cos (* 1/180 (* angle (PI)))) 5))))))))) |
(* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(* a (+ (* 1/8 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))) |
(* a (+ (* -1/32 (/ (* (pow b 4) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/8 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))) |
(* a (+ (* -1/32 (/ (* (pow b 4) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/64 (/ (* (pow b 6) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 6) (* (sqrt 2) (sqrt 8))))) (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 5)))) (+ (* 1/8 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))) |
(* -1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(* -1 (* a (+ (* 1/8 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))) |
(* -1 (* a (+ (* -1/32 (/ (* (pow b 4) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/8 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))) |
(* -1 (* a (+ (* -1/32 (/ (* (pow b 4) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/64 (/ (* (pow b 6) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 6) (* (sqrt 2) (sqrt 8))))) (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 5)))) (+ (* 1/8 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))))) |
(* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(* 1/720 (* a (* angle (* y-scale (* (PI) (* (sqrt 2) (sqrt 8))))))) |
(* angle (+ (* -1/139968000 (* a (* (pow angle 2) (* y-scale (* (pow (PI) 3) (* (sqrt 2) (sqrt 8))))))) (* 1/720 (* a (* y-scale (* (PI) (* (sqrt 2) (sqrt 8)))))))) |
(* angle (+ (* 1/720 (* a (* y-scale (* (PI) (* (sqrt 2) (sqrt 8)))))) (* (pow angle 2) (+ (* -1/139968000 (* a (* y-scale (* (pow (PI) 3) (* (sqrt 2) (sqrt 8)))))) (* 1/90699264000000 (* a (* (pow angle 2) (* y-scale (* (pow (PI) 5) (* (sqrt 2) (sqrt 8))))))))))) |
(* angle (+ (* 1/720 (* a (* y-scale (* (PI) (* (sqrt 2) (sqrt 8)))))) (* (pow angle 2) (+ (* -1/139968000 (* a (* y-scale (* (pow (PI) 3) (* (sqrt 2) (sqrt 8)))))) (* (pow angle 2) (+ (* -1/123423558451200000000 (* a (* (pow angle 2) (* y-scale (* (pow (PI) 7) (* (sqrt 2) (sqrt 8))))))) (* 1/90699264000000 (* a (* y-scale (* (pow (PI) 5) (* (sqrt 2) (sqrt 8)))))))))))) |
(* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) |
(* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) |
(* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) |
(* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) |
(* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) |
(* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) |
(* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) |
(* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) |
(* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) |
(* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) |
(* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) |
(* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) |
(* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) |
(* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) |
(* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) |
(* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) |
(* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) |
(* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) |
(* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) |
(* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) |
(* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) |
(* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) |
(* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) |
(* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) |
(* 1/180 (* a (* angle (* y-scale (* (PI) (* (sqrt 2) (sqrt 8))))))) |
(* angle (+ (* -1/34992000 (* a (* (pow angle 2) (* y-scale (* (pow (PI) 3) (* (sqrt 2) (sqrt 8))))))) (* 1/180 (* a (* y-scale (* (PI) (* (sqrt 2) (sqrt 8)))))))) |
(* angle (+ (* 1/180 (* a (* y-scale (* (PI) (* (sqrt 2) (sqrt 8)))))) (* (pow angle 2) (+ (* -1/34992000 (* a (* y-scale (* (pow (PI) 3) (* (sqrt 2) (sqrt 8)))))) (* 1/22674816000000 (* a (* (pow angle 2) (* y-scale (* (pow (PI) 5) (* (sqrt 2) (sqrt 8))))))))))) |
(* angle (+ (* 1/180 (* a (* y-scale (* (PI) (* (sqrt 2) (sqrt 8)))))) (* (pow angle 2) (+ (* -1/34992000 (* a (* y-scale (* (pow (PI) 3) (* (sqrt 2) (sqrt 8)))))) (* (pow angle 2) (+ (* -1/30855889612800000000 (* a (* (pow angle 2) (* y-scale (* (pow (PI) 7) (* (sqrt 2) (sqrt 8))))))) (* 1/22674816000000 (* a (* y-scale (* (pow (PI) 5) (* (sqrt 2) (sqrt 8)))))))))))) |
(* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) |
(* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) |
(* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) |
(* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) |
(* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) |
(* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) |
(* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) |
(* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) |
(/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) |
(+ (* (pow a 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) |
(+ (* (pow a 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) |
(+ (* (pow a 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) |
(* (pow a 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))) |
(* (pow a 2) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) (pow y-scale 2)))))) |
(* (pow a 2) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) (pow y-scale 2)))))) |
(* (pow a 2) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) (pow y-scale 2)))))) |
(* (pow a 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))) |
(* (pow a 2) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) (pow y-scale 2)))))) |
(* (pow a 2) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) (pow y-scale 2)))))) |
(* (pow a 2) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) (pow y-scale 2)))))) |
(/ (pow a 2) (pow y-scale 2)) |
(+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (pow a 2) (pow y-scale 2))) |
(+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2)))))))) (/ (pow a 2) (pow y-scale 2))) |
(+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))) (* (pow angle 2) (+ (* -1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow y-scale 2))) (* 1/765275040000000 (/ (* (pow b 2) (pow (PI) 6)) (pow y-scale 2))))))))))) (/ (pow a 2) (pow y-scale 2))) |
(+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) |
(+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) |
(+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) |
(+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) |
(+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) |
(+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) |
(+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) |
(+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) |
(/ (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2)) |
(/ (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2)) |
(/ (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2)) |
(/ (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2)) |
(/ (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2)) |
(/ (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2)) |
(/ (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2)) |
(/ (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2)) |
(/ (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2)) |
(/ (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2)) |
(/ (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2)) |
(/ (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2)) |
(/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) |
(+ (* (pow b 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) |
(+ (* (pow b 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) |
(+ (* (pow b 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) |
(* (pow b 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))) |
(* (pow b 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (pow y-scale 2)))))) |
(* (pow b 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (pow y-scale 2)))))) |
(* (pow b 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (pow y-scale 2)))))) |
(* (pow b 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))) |
(* (pow b 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (pow y-scale 2)))))) |
(* (pow b 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (pow y-scale 2)))))) |
(* (pow b 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (pow y-scale 2)))))) |
1 |
(+ 1 (* -1/32400 (* (pow angle 2) (pow (PI) 2)))) |
(+ 1 (* (pow angle 2) (+ (* -1/32400 (pow (PI) 2)) (* 1/3149280000 (* (pow angle 2) (pow (PI) 4)))))) |
(+ 1 (* (pow angle 2) (+ (* -1/32400 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/765275040000000 (* (pow angle 2) (pow (PI) 6))) (* 1/3149280000 (pow (PI) 4))))))) |
(+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) |
(+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) |
(+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) |
(+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) |
(+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) |
(+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) |
(+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) |
(+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) |
(* 1/32400 (* (pow angle 2) (pow (PI) 2))) |
(* (pow angle 2) (+ (* -1/3149280000 (* (pow angle 2) (pow (PI) 4))) (* 1/32400 (pow (PI) 2)))) |
(* (pow angle 2) (+ (* 1/32400 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/3149280000 (pow (PI) 4)) (* 1/765275040000000 (* (pow angle 2) (pow (PI) 6))))))) |
(* (pow angle 2) (+ (* 1/32400 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/3149280000 (pow (PI) 4)) (* (pow angle 2) (+ (* -1/347128758144000000000 (* (pow angle 2) (pow (PI) 8))) (* 1/765275040000000 (pow (PI) 6)))))))) |
(+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) |
(+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) |
(+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) |
(+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) |
(+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) |
(+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) |
(+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) |
(+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))) |
(+ (* 1/16 (* (/ (* a (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))) (* a (+ (* 1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* 1/8 (* (* a (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (+ (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (sqrt (/ 1 (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))) (* a (+ (* 1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* a (+ (* 1/8 (* (* a (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 (pow b 3)) (* 2 (pow b 3))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (* 1/4 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 (pow b 3)) (* 2 (pow b 3))) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (+ (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))) (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (+ (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))) (sqrt (/ 1 (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))))))) |
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) |
(* a (+ (* 1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))) (* a (* x-scale y-scale))) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) |
(* a (+ (* 1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))) (* a (* x-scale y-scale))) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))))))) (pow a 2)) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))))) |
(* a (+ (* 1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))) (* a (* x-scale y-scale))) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 b) (* 2 b)) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (* 1/4 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 b) (* 2 b)) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))))))) (pow a 3)) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))))))) (pow a 2)) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))))) |
(* -1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) |
(* -1 (* a (+ (* -1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))) (* a (* x-scale y-scale))) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))))) |
(* -1 (* a (+ (* -1 (/ (+ (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))))))) a) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))) (* 1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))))) a)) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))))) |
(* -1 (* a (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 b) (* 2 b)) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (* 1/4 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 b) (* 2 b)) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))))))) a) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))) (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))))))) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) a)) (* 1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))))) a)) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) |
(+ (* 1/16 (* (/ (* b (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* b (+ (* 1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* 1/8 (* (* b (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (+ (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (sqrt (/ 1 (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* b (+ (* 1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* b (+ (* 1/8 (* (* b (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 (pow a 3)) (* 2 (pow a 3))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (* 1/4 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 (pow a 3)) (* 2 (pow a 3))) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (+ (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (+ (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (sqrt (/ 1 (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))))))) |
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))) |
(* b (+ (* 1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))) (* b (* x-scale y-scale))) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) |
(* b (+ (* 1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))) (* b (* x-scale y-scale))) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))))))) (pow b 2)) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))))) |
(* b (+ (* 1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))) (* b (* x-scale y-scale))) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 a) (* 2 a)) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (* 1/4 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 a) (* 2 a)) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))))))) (pow b 3)) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))))))) (pow b 2)) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))))) |
(* -1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))) |
(* -1 (* b (+ (* -1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))) (* b (* x-scale y-scale))) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))))) |
(* -1 (* b (+ (* -1 (/ (+ (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))))))) b) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (* 1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))))) b)) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))))) |
(* -1 (* b (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 a) (* 2 a)) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (* 1/4 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 a) (* 2 a)) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))))))) b) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))))))) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) b)) (* 1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))))) b)) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))))) |
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))) |
(+ (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) |
(+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))))) |
(+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))) (pow x-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))))) |
(* -1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))) |
(* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) |
(* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))))) |
(* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))) (pow x-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))))) |
(* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))) |
(+ (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) |
(+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))))) |
(+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) |
(* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))) |
(* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) |
(* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))) (pow y-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))))) |
(* -1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) |
(* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) |
(* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))))) |
(* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))) (pow y-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))))) |
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) |
(+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))))))) (* b (sqrt 2)))) (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))) |
(+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/2 (/ (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))))) (* b (sqrt 2))))))) |
(+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))))) (* b (sqrt 2)))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow y-scale 2))) (+ (* -1/765275040000000 (/ (* (pow b 2) (pow (PI) 6)) (pow x-scale 2))) (+ (* 1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow x-scale 2))) (+ (* 1/765275040000000 (/ (* (pow b 2) (pow (PI) 6)) (pow y-scale 2))) (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))))) (+ (* 2 (* (- (+ (* -1/765275040000000 (/ (* (pow b 2) (pow (PI) 6)) (pow x-scale 2))) (* 1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow x-scale 2)))) (+ (* -1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow y-scale 2))) (* 1/765275040000000 (/ (* (pow b 2) (pow (PI) 6)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow (+ a b) 2) (* (+ (* 1/31886460000000 (pow (PI) 6)) (* 1/19131876000000 (pow (PI) 6))) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (* 1/2 (/ (* (pow x-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/2 (/ (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/2 (/ (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2)))))))) (* b (sqrt 2))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))) |
(* 1/180 (* angle (PI))) |
(* angle (+ (* -1/34992000 (* (pow angle 2) (pow (PI) 3))) (* 1/180 (PI)))) |
(* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* 1/22674816000000 (* (pow angle 2) (pow (PI) 5))))))) |
(* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* (pow angle 2) (+ (* -1/30855889612800000000 (* (pow angle 2) (pow (PI) 7))) (* 1/22674816000000 (pow (PI) 5)))))))) |
(sin (* 1/180 (* angle (PI)))) |
(sin (* 1/180 (* angle (PI)))) |
(sin (* 1/180 (* angle (PI)))) |
(sin (* 1/180 (* angle (PI)))) |
(sin (* 1/180 (* angle (PI)))) |
(sin (* 1/180 (* angle (PI)))) |
(sin (* 1/180 (* angle (PI)))) |
(sin (* 1/180 (* angle (PI)))) |
(/ 2 (pow y-scale 2)) |
(+ (* -1/16200 (/ (* (pow angle 2) (pow (PI) 2)) (pow y-scale 2))) (* 2 (/ 1 (pow y-scale 2)))) |
(+ (* (pow angle 2) (+ (* -1/16200 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/1574640000 (/ (* (pow angle 2) (pow (PI) 4)) (pow y-scale 2))))) (* 2 (/ 1 (pow y-scale 2)))) |
(+ (* (pow angle 2) (+ (* -1/16200 (/ (pow (PI) 2) (pow y-scale 2))) (* (pow angle 2) (+ (* -1/382637520000000 (/ (* (pow angle 2) (pow (PI) 6)) (pow y-scale 2))) (* 1/1574640000 (/ (pow (PI) 4) (pow y-scale 2))))))) (* 2 (/ 1 (pow y-scale 2)))) |
(* 2 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow y-scale 2))) |
(* 2 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow y-scale 2))) |
(* 2 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow y-scale 2))) |
(* 2 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow y-scale 2))) |
(* 2 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow y-scale 2))) |
(* 2 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow y-scale 2))) |
(* 2 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow y-scale 2))) |
(* 2 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow y-scale 2))) |
(* 2 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow y-scale 2))) |
(* 2 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow y-scale 2))) |
(* 2 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow y-scale 2))) |
(* 2 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow y-scale 2))) |
(* 2 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow y-scale 2))) |
(* 2 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow y-scale 2))) |
(* 2 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow y-scale 2))) |
(* 2 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow y-scale 2))) |
(* 2 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow y-scale 2))) |
(* 2 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow y-scale 2))) |
(* 2 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow y-scale 2))) |
(* 2 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow y-scale 2))) |
(+ 1 (cos (* 1/90 (* angle (PI))))) |
(+ 1 (cos (* 1/90 (* angle (PI))))) |
(+ 1 (cos (* 1/90 (* angle (PI))))) |
(+ 1 (cos (* 1/90 (* angle (PI))))) |
(+ 1 (cos (* 1/90 (* angle (PI))))) |
(+ 1 (cos (* 1/90 (* angle (PI))))) |
(+ 1 (cos (* 1/90 (* angle (PI))))) |
(+ 1 (cos (* 1/90 (* angle (PI))))) |
(+ 1 (cos (* 1/90 (* angle (PI))))) |
(+ 1 (cos (* 1/90 (* angle (PI))))) |
(+ 1 (cos (* 1/90 (* angle (PI))))) |
(+ 1 (cos (* 1/90 (* angle (PI))))) |
2 |
(+ 2 (* -1/16200 (* (pow angle 2) (pow (PI) 2)))) |
(+ 2 (* (pow angle 2) (+ (* -1/16200 (pow (PI) 2)) (* 1/1574640000 (* (pow angle 2) (pow (PI) 4)))))) |
(+ 2 (* (pow angle 2) (+ (* -1/16200 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/382637520000000 (* (pow angle 2) (pow (PI) 6))) (* 1/1574640000 (pow (PI) 4))))))) |
(+ 1 (cos (* 1/90 (* angle (PI))))) |
(+ 1 (cos (* 1/90 (* angle (PI))))) |
(+ 1 (cos (* 1/90 (* angle (PI))))) |
(+ 1 (cos (* 1/90 (* angle (PI))))) |
(+ 1 (cos (* 1/90 (* angle (PI))))) |
(+ 1 (cos (* 1/90 (* angle (PI))))) |
(+ 1 (cos (* 1/90 (* angle (PI))))) |
(+ 1 (cos (* 1/90 (* angle (PI))))) |
(* 1/90 (* angle (PI))) |
(* 1/90 (* angle (PI))) |
(* 1/90 (* angle (PI))) |
(* 1/90 (* angle (PI))) |
(* 1/90 (* angle (PI))) |
(* 1/90 (* angle (PI))) |
(* 1/90 (* angle (PI))) |
(* 1/90 (* angle (PI))) |
(* 1/90 (* angle (PI))) |
(* 1/90 (* angle (PI))) |
(* 1/90 (* angle (PI))) |
(* 1/90 (* angle (PI))) |
(* b (sqrt 2)) |
(+ (* 1/2 (/ (* (pow angle 2) (* (sqrt 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))))) b)) (* b (sqrt 2))) |
(+ (* b (sqrt 2)) (* (pow angle 2) (+ (* 1/2 (/ (* (sqrt 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) b)) (* 1/2 (/ (* (pow angle 2) (* (sqrt 2) (- (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (* 1/4 (/ (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2) (pow b 2)))))) b))))) |
(+ (* b (sqrt 2)) (* (pow angle 2) (+ (* 1/2 (/ (* (sqrt 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) b)) (* (pow angle 2) (+ (* 1/2 (/ (* (sqrt 2) (- (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (* 1/4 (/ (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2) (pow b 2))))) b)) (* 1/2 (/ (* (pow angle 2) (* (sqrt 2) (- (+ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6))))) (* 1/2 (/ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (- (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (* 1/4 (/ (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2) (pow b 2))))) (pow b 2)))))) b))))))) |
(* (sqrt 2) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) |
(* (sqrt 2) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) |
(* (sqrt 2) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) |
(* (sqrt 2) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) |
(* (sqrt 2) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) |
(* (sqrt 2) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) |
(* (sqrt 2) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) |
(* (sqrt 2) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) |
(* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))) |
(+ (* 1/2 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (sqrt 2))) (* a (sin (* 1/180 (* angle (PI))))))) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) |
(+ (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))) (* (pow b 2) (+ (* -1/8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (sqrt 2))) (* (pow a 3) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* 1/2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (sqrt 2)) (* a (sin (* 1/180 (* angle (PI)))))))))) |
(+ (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))) (* (pow b 2) (+ (* 1/2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (sqrt 2)) (* a (sin (* 1/180 (* angle (PI))))))) (* (pow b 2) (+ (* -1/8 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (sqrt 2)) (* (pow a 3) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* 1/16 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 6) (sqrt 2))) (* (pow a 5) (pow (sin (* 1/180 (* angle (PI)))) 5))))))))) |
(* b (* (cos (* 1/180 (* angle (PI)))) (sqrt 2))) |
(* b (+ (* 1/2 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 2))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* (cos (* 1/180 (* angle (PI)))) (sqrt 2)))) |
(* b (+ (* -1/8 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 2))) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/2 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 2))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* (cos (* 1/180 (* angle (PI)))) (sqrt 2))))) |
(* b (+ (* -1/8 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 2))) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/16 (/ (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (sqrt 2))) (* (pow b 6) (pow (cos (* 1/180 (* angle (PI)))) 5)))) (+ (* 1/2 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 2))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* (cos (* 1/180 (* angle (PI)))) (sqrt 2)))))) |
(* -1 (* b (* (cos (* 1/180 (* angle (PI)))) (sqrt 2)))) |
(* -1 (* b (+ (* 1/2 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 2))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* (cos (* 1/180 (* angle (PI)))) (sqrt 2))))) |
(* -1 (* b (+ (* -1/8 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 2))) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/2 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 2))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* (cos (* 1/180 (* angle (PI)))) (sqrt 2)))))) |
(* -1 (* b (+ (* -1/8 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 2))) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/16 (/ (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (sqrt 2))) (* (pow b 6) (pow (cos (* 1/180 (* angle (PI)))) 5)))) (+ (* 1/2 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 2))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* (cos (* 1/180 (* angle (PI)))) (sqrt 2))))))) |
(* b (* (cos (* 1/180 (* angle (PI)))) (sqrt 2))) |
(+ (* 1/2 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 2))) (* b (cos (* 1/180 (* angle (PI))))))) (* b (* (cos (* 1/180 (* angle (PI)))) (sqrt 2)))) |
(+ (* b (* (cos (* 1/180 (* angle (PI)))) (sqrt 2))) (* (pow a 2) (+ (* -1/8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 2))) (* (pow b 3) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (* 1/2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 2)) (* b (cos (* 1/180 (* angle (PI)))))))))) |
(+ (* b (* (cos (* 1/180 (* angle (PI)))) (sqrt 2))) (* (pow a 2) (+ (* 1/2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 2)) (* b (cos (* 1/180 (* angle (PI))))))) (* (pow a 2) (+ (* -1/8 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 2)) (* (pow b 3) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (* 1/16 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (sqrt 2))) (* (pow b 5) (pow (cos (* 1/180 (* angle (PI)))) 5))))))))) |
(* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))) |
(* a (+ (* 1/2 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (sqrt 2))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) |
(* a (+ (* -1/8 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (sqrt 2))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/2 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (sqrt 2))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) |
(* a (+ (* -1/8 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (sqrt 2))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/16 (/ (* (pow b 6) (* (pow (cos (* 1/180 (* angle (PI)))) 6) (sqrt 2))) (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 5)))) (+ (* 1/2 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (sqrt 2))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))) |
(* -1 (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) |
(* -1 (* a (+ (* 1/2 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (sqrt 2))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) |
(* -1 (* a (+ (* -1/8 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (sqrt 2))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/2 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (sqrt 2))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))) |
(* -1 (* a (+ (* -1/8 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (sqrt 2))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/16 (/ (* (pow b 6) (* (pow (cos (* 1/180 (* angle (PI)))) 6) (sqrt 2))) (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 5)))) (+ (* 1/2 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (sqrt 2))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))) |
(* 1/180 (* angle (PI))) |
(* angle (+ (* -1/34992000 (* (pow angle 2) (pow (PI) 3))) (* 1/180 (PI)))) |
(* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* 1/22674816000000 (* (pow angle 2) (pow (PI) 5))))))) |
(* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* (pow angle 2) (+ (* -1/30855889612800000000 (* (pow angle 2) (pow (PI) 7))) (* 1/22674816000000 (pow (PI) 5)))))))) |
(sin (* 1/180 (* angle (PI)))) |
(sin (* 1/180 (* angle (PI)))) |
(sin (* 1/180 (* angle (PI)))) |
(sin (* 1/180 (* angle (PI)))) |
(sin (* 1/180 (* angle (PI)))) |
(sin (* 1/180 (* angle (PI)))) |
(sin (* 1/180 (* angle (PI)))) |
(sin (* 1/180 (* angle (PI)))) |
1 |
(+ 1 (* -1/32400 (* (pow angle 2) (pow (PI) 2)))) |
(+ 1 (* (pow angle 2) (+ (* -1/32400 (pow (PI) 2)) (* (pow angle 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) |
(+ 1 (* (pow angle 2) (+ (* -1/32400 (pow (PI) 2)) (* (pow angle 2) (+ (* 1/12597120000 (pow (PI) 4)) (+ (* 1/4199040000 (pow (PI) 4)) (* (pow angle 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))))))))) |
(pow (cos (* 1/180 (* angle (PI)))) 2) |
(pow (cos (* 1/180 (* angle (PI)))) 2) |
(pow (cos (* 1/180 (* angle (PI)))) 2) |
(pow (cos (* 1/180 (* angle (PI)))) 2) |
(pow (cos (* 1/180 (* angle (PI)))) 2) |
(pow (cos (* 1/180 (* angle (PI)))) 2) |
(pow (cos (* 1/180 (* angle (PI)))) 2) |
(pow (cos (* 1/180 (* angle (PI)))) 2) |
1 |
(+ 1 (* -1/16200 (* (pow angle 2) (pow (PI) 2)))) |
(+ 1 (* (pow angle 2) (+ (* -1/16200 (pow (PI) 2)) (* 1/1574640000 (* (pow angle 2) (pow (PI) 4)))))) |
(+ 1 (* (pow angle 2) (+ (* -1/16200 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/382637520000000 (* (pow angle 2) (pow (PI) 6))) (* 1/1574640000 (pow (PI) 4))))))) |
(cos (* 1/90 (* angle (PI)))) |
(cos (* 1/90 (* angle (PI)))) |
(cos (* 1/90 (* angle (PI)))) |
(cos (* 1/90 (* angle (PI)))) |
(cos (* 1/90 (* angle (PI)))) |
(cos (* 1/90 (* angle (PI)))) |
(cos (* 1/90 (* angle (PI)))) |
(cos (* 1/90 (* angle (PI)))) |
(* (/ (* b (sqrt 2)) y-scale) (sqrt (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) |
(+ (* 1/2 (* (/ (* (pow a 2) (* y-scale (* (sqrt 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) b) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (* (/ (* b (sqrt 2)) y-scale) (sqrt (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))) |
(+ (* (/ (* b (sqrt 2)) y-scale) (sqrt (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 2) (+ (* -1/8 (* (/ (* (pow a 2) (* (pow y-scale 3) (* (sqrt 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (pow b 3)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 3))))) (* 1/2 (* (/ (* y-scale (* (sqrt 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) b) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))))))) |
(+ (* (/ (* b (sqrt 2)) y-scale) (sqrt (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 2) (+ (* 1/2 (* (/ (* y-scale (* (sqrt 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) b) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (* (pow a 2) (+ (* -1/8 (* (/ (* (pow y-scale 3) (* (sqrt 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (pow b 3)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 3))))) (* 1/16 (* (/ (* (pow a 2) (* (pow y-scale 5) (* (sqrt 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 3)))) (pow b 5)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 5)))))))))) |
(* (* a (sqrt 2)) (sqrt (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) |
(* a (+ (* 1/2 (* (/ (* (pow b 2) (* (sqrt 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 2) (pow y-scale 2))) (sqrt (/ 1 (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (* (sqrt 2) (sqrt (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) |
(* a (+ (* -1/8 (* (/ (* (pow b 4) (* (sqrt 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2))) (* (pow a 4) (pow y-scale 4))) (sqrt (/ 1 (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 3))))) (+ (* 1/2 (* (/ (* (pow b 2) (* (sqrt 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 2) (pow y-scale 2))) (sqrt (/ 1 (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (* (sqrt 2) (sqrt (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))))) |
(* a (+ (* -1/8 (* (/ (* (pow b 4) (* (sqrt 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2))) (* (pow a 4) (pow y-scale 4))) (sqrt (/ 1 (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 3))))) (+ (* 1/16 (* (/ (* (pow b 6) (* (sqrt 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 3))) (* (pow a 6) (pow y-scale 6))) (sqrt (/ 1 (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 5))))) (+ (* 1/2 (* (/ (* (pow b 2) (* (sqrt 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 2) (pow y-scale 2))) (sqrt (/ 1 (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (* (sqrt 2) (sqrt (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))))) |
(* -1 (* (* a (sqrt 2)) (sqrt (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) |
(* -1 (* a (+ (* 1/2 (* (/ (* (pow b 2) (* (sqrt 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 2) (pow y-scale 2))) (sqrt (/ 1 (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (* (sqrt 2) (sqrt (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))))) |
(* -1 (* a (+ (* -1/8 (* (/ (* (pow b 4) (* (sqrt 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2))) (* (pow a 4) (pow y-scale 4))) (sqrt (/ 1 (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 3))))) (+ (* 1/2 (* (/ (* (pow b 2) (* (sqrt 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 2) (pow y-scale 2))) (sqrt (/ 1 (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (* (sqrt 2) (sqrt (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))))) |
(* -1 (* a (+ (* -1/8 (* (/ (* (pow b 4) (* (sqrt 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2))) (* (pow a 4) (pow y-scale 4))) (sqrt (/ 1 (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 3))))) (+ (* 1/16 (* (/ (* (pow b 6) (* (sqrt 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 3))) (* (pow a 6) (pow y-scale 6))) (sqrt (/ 1 (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 5))))) (+ (* 1/2 (* (/ (* (pow b 2) (* (sqrt 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 2) (pow y-scale 2))) (sqrt (/ 1 (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (* (sqrt 2) (sqrt (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))))))) |
(/ (* a (sqrt 2)) y-scale) |
(+ (* 1/2 (/ (* (pow angle 2) (* y-scale (* (sqrt 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))))) a)) (/ (* a (sqrt 2)) y-scale)) |
(+ (* (pow angle 2) (+ (* 1/2 (/ (* y-scale (* (sqrt 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) a)) (* 1/2 (/ (* (pow angle 2) (* y-scale (* (sqrt 2) (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2)))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 2))))))) a)))) (/ (* a (sqrt 2)) y-scale)) |
(+ (* (pow angle 2) (+ (* 1/2 (/ (* y-scale (* (sqrt 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) a)) (* (pow angle 2) (+ (* 1/2 (/ (* y-scale (* (sqrt 2) (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2)))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 2)))))) a)) (* 1/2 (/ (* (pow angle 2) (* y-scale (* (sqrt 2) (- (+ (* -1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow y-scale 2))) (* 1/765275040000000 (/ (* (pow b 2) (pow (PI) 6)) (pow y-scale 2)))) (* 1/2 (/ (* (pow y-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2)))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 2)))))) (pow a 2))))))) a)))))) (/ (* a (sqrt 2)) y-scale)) |
(* (sqrt 2) (sqrt (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) |
(* (sqrt 2) (sqrt (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) |
(* (sqrt 2) (sqrt (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) |
(* (sqrt 2) (sqrt (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) |
(* (sqrt 2) (sqrt (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) |
(* (sqrt 2) (sqrt (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) |
(* (sqrt 2) (sqrt (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) |
(* (sqrt 2) (sqrt (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) |
(* (/ (sqrt 2) y-scale) (sqrt (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) |
(* (/ (sqrt 2) y-scale) (sqrt (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) |
(* (/ (sqrt 2) y-scale) (sqrt (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) |
(* (/ (sqrt 2) y-scale) (sqrt (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) |
(* (/ (sqrt 2) y-scale) (sqrt (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) |
(* (/ (sqrt 2) y-scale) (sqrt (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) |
(* (/ (sqrt 2) y-scale) (sqrt (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) |
(* (/ (sqrt 2) y-scale) (sqrt (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) |
(* -1 (* (/ (sqrt 2) y-scale) (sqrt (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))))) |
(* -1 (* (/ (sqrt 2) y-scale) (sqrt (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))))) |
(* -1 (* (/ (sqrt 2) y-scale) (sqrt (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))))) |
(* -1 (* (/ (sqrt 2) y-scale) (sqrt (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))))) |
(* (/ (* a (sqrt 2)) y-scale) (sqrt (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) |
(+ (* 1/2 (* (/ (* (pow b 2) (* y-scale (* (sqrt 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) a) (sqrt (/ 1 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (* (/ (* a (sqrt 2)) y-scale) (sqrt (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) |
(+ (* (/ (* a (sqrt 2)) y-scale) (sqrt (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow b 2) (+ (* -1/8 (* (/ (* (pow b 2) (* (pow y-scale 3) (* (sqrt 2) (pow (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (pow a 3)) (sqrt (/ 1 (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 3))))) (* 1/2 (* (/ (* y-scale (* (sqrt 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) a) (sqrt (/ 1 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) |
(+ (* (/ (* a (sqrt 2)) y-scale) (sqrt (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow b 2) (+ (* 1/2 (* (/ (* y-scale (* (sqrt 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) a) (sqrt (/ 1 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (* (pow b 2) (+ (* -1/8 (* (/ (* (pow y-scale 3) (* (sqrt 2) (pow (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (pow a 3)) (sqrt (/ 1 (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 3))))) (* 1/16 (* (/ (* (pow b 2) (* (pow y-scale 5) (* (sqrt 2) (pow (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 3)))) (pow a 5)) (sqrt (/ 1 (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 5)))))))))) |
(* (* b (sqrt 2)) (sqrt (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) |
(* b (+ (* 1/2 (* (/ (* (pow a 2) (* (sqrt 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow b 2) (pow y-scale 2))) (sqrt (/ 1 (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (* (sqrt 2) (sqrt (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) |
(* b (+ (* -1/8 (* (/ (* (pow a 4) (* (sqrt 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2))) (* (pow b 4) (pow y-scale 4))) (sqrt (/ 1 (pow (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 3))))) (+ (* 1/2 (* (/ (* (pow a 2) (* (sqrt 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow b 2) (pow y-scale 2))) (sqrt (/ 1 (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (* (sqrt 2) (sqrt (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))))) |
(* b (+ (* -1/8 (* (/ (* (pow a 4) (* (sqrt 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2))) (* (pow b 4) (pow y-scale 4))) (sqrt (/ 1 (pow (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 3))))) (+ (* 1/16 (* (/ (* (pow a 6) (* (sqrt 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 3))) (* (pow b 6) (pow y-scale 6))) (sqrt (/ 1 (pow (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 5))))) (+ (* 1/2 (* (/ (* (pow a 2) (* (sqrt 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow b 2) (pow y-scale 2))) (sqrt (/ 1 (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (* (sqrt 2) (sqrt (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))))) |
(* -1 (* (* b (sqrt 2)) (sqrt (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) |
(* -1 (* b (+ (* 1/2 (* (/ (* (pow a 2) (* (sqrt 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow b 2) (pow y-scale 2))) (sqrt (/ 1 (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (* (sqrt 2) (sqrt (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))))) |
(* -1 (* b (+ (* -1/8 (* (/ (* (pow a 4) (* (sqrt 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2))) (* (pow b 4) (pow y-scale 4))) (sqrt (/ 1 (pow (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 3))))) (+ (* 1/2 (* (/ (* (pow a 2) (* (sqrt 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow b 2) (pow y-scale 2))) (sqrt (/ 1 (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (* (sqrt 2) (sqrt (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))))) |
(* -1 (* b (+ (* -1/8 (* (/ (* (pow a 4) (* (sqrt 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2))) (* (pow b 4) (pow y-scale 4))) (sqrt (/ 1 (pow (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 3))))) (+ (* 1/16 (* (/ (* (pow a 6) (* (sqrt 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 3))) (* (pow b 6) (pow y-scale 6))) (sqrt (/ 1 (pow (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 5))))) (+ (* 1/2 (* (/ (* (pow a 2) (* (sqrt 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow b 2) (pow y-scale 2))) (sqrt (/ 1 (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (* (sqrt 2) (sqrt (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))))))) |
(* 1/4 (* (* (sqrt 2) (sqrt 8)) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) |
(+ (* 1/8 (* (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* 1/4 (* (* (sqrt 2) (sqrt 8)) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) |
(+ (* 1/8 (* (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* 1/4 (* (* (sqrt 2) (sqrt 8)) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) |
(+ (* 1/8 (* (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* 1/4 (* (* (sqrt 2) (sqrt 8)) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) |
(* 1/8 (* (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) |
(* (pow y-scale 2) (+ (* 1/8 (* (/ (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* 1/4 (* (/ (* (sqrt 2) (sqrt 8)) (pow y-scale 2)) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) |
(* (pow y-scale 2) (+ (* 1/8 (* (/ (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* 1/4 (* (/ (* (sqrt 2) (sqrt 8)) (pow y-scale 2)) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) |
(* (pow y-scale 2) (+ (* 1/8 (* (/ (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* 1/4 (* (/ (* (sqrt 2) (sqrt 8)) (pow y-scale 2)) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) |
(* -1/8 (* (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) |
(* (pow y-scale 2) (+ (* -1/4 (* (/ (* (sqrt 2) (sqrt 8)) (pow y-scale 2)) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* -1/8 (* (/ (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) |
(* (pow y-scale 2) (+ (* -1/4 (* (/ (* (sqrt 2) (sqrt 8)) (pow y-scale 2)) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* -1/8 (* (/ (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) |
(* (pow y-scale 2) (+ (* -1/4 (* (/ (* (sqrt 2) (sqrt 8)) (pow y-scale 2)) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* -1/8 (* (/ (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) |
(+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (* 1/4 (* a (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (+ (* 1/4 (* a (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* b (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))))))) (* (pow a 3) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))))) |
(+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (+ (* 1/4 (* a (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* b (+ (* 1/4 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))))) (* (pow a 3) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (* b (+ (* 1/8 (+ (* -1/2 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow a 3) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 3))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))))) (* 1/8 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))) (* a (cos (* 1/180 (* angle (PI))))))))))))) |
(+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (+ (* 1/4 (* a (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* b (+ (* 1/4 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))))) (* (pow a 3) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (* b (+ (* 1/8 (* b (+ (* -1 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))))) (* (pow a 5) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 3))))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (pow a 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))))))) (+ (* 1/8 (+ (* -1/2 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow a 3) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 3))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))))) (* 1/8 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))) (* a (cos (* 1/180 (* angle (PI)))))))))))))) |
(* b (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(* b (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))))))) |
(* b (+ (* 1/8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (* (pow b 2) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/8 (/ (+ (* -1/2 (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (pow b 2))) (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))))))))) |
(* b (+ (* 1/8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (* (pow b 2) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/8 (/ (+ (* -1 (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 a) (* 2 a))))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* 4 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (+ (* -2 a) (* 2 a)))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (pow b 3))) (+ (* 1/8 (/ (+ (* -1/2 (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (pow b 2))) (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))))))))) |
(* -1 (* b (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))) |
(* -1 (* b (+ (* -1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))) |
(* -1 (* b (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/8 (+ (* -1/2 (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (sin (* 1/180 (* angle (PI))))))) b)) (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) b)) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))) |
(* -1 (* b (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (/ (+ (* -1 (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 a) (* 2 a))))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* 4 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (+ (* -2 a) (* 2 a)))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) b)) (+ (* 1/8 (+ (* -1/2 (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (sin (* 1/180 (* angle (PI)))))))) b)) (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) b)) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))) |
(+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (pow b 2)) (pow b 2))))) (* a (pow x-scale 2)))) (* 1/4 (* a (* (sqrt 2) (sqrt 8))))) |
(+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (pow b 2)) (pow b 2))))) (* a (pow x-scale 2)))) (+ (* 1/4 (* a (* (sqrt 2) (sqrt 8)))) (* (pow angle 2) (+ (* 1/8 (+ (* -1/2 (/ (* (pow y-scale 4) (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1 (pow b 2)) (pow b 2)) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))))) (* (pow a 3) (pow x-scale 2)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))))))) (* a (pow x-scale 2))))) (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 2) (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))))) a)))))) |
(+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (pow b 2)) (pow b 2))))) (* a (pow x-scale 2)))) (+ (* 1/4 (* a (* (sqrt 2) (sqrt 8)))) (* (pow angle 2) (+ (* 1/8 (+ (* -1/2 (/ (* (pow y-scale 4) (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1 (pow b 2)) (pow b 2)) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))))) (* (pow a 3) (pow x-scale 2)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))))))) (* a (pow x-scale 2))))) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 2) (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))))) a)) (* (pow angle 2) (+ (* 1/8 (+ (* -1/2 (/ (* a (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (+ (* 1/4 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (/ (* (pow y-scale 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (pow a 4)))) (+ (* -1 (pow b 2)) (pow b 2)))))) (pow x-scale 2))) (+ (* -1/2 (/ (* (pow y-scale 4) (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2))))))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))))) (* (pow a 3) (pow x-scale 2)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (+ (* (pow b 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 2))))) (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))))) (pow a 2)) (+ (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))) (pow a 2))) (/ (* (pow y-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))) (pow a 2))))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))) (* a (pow x-scale 2)))))) (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 2) (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 2))))))) a))))))))) |
(+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (pow b 2)) (pow b 2))))) (* a (pow x-scale 2)))) (+ (* 1/4 (* a (* (sqrt 2) (sqrt 8)))) (* (pow angle 2) (+ (* 1/8 (+ (* -1/2 (/ (* (pow y-scale 4) (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1 (pow b 2)) (pow b 2)) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))))) (* (pow a 3) (pow x-scale 2)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))))))) (* a (pow x-scale 2))))) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 2) (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))))) a)) (* (pow angle 2) (+ (* 1/8 (+ (* -1/2 (/ (* a (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (+ (* 1/4 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (/ (* (pow y-scale 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (pow a 4)))) (+ (* -1 (pow b 2)) (pow b 2)))))) (pow x-scale 2))) (+ (* -1/2 (/ (* (pow y-scale 4) (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2))))))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))))) (* (pow a 3) (pow x-scale 2)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (+ (* (pow b 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 2))))) (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))))) (pow a 2)) (+ (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))) (pow a 2))) (/ (* (pow y-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))) (pow a 2))))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))) (* a (pow x-scale 2)))))) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 2) (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 2))))))) a)) (* (pow angle 2) (+ (* 1/8 (+ (* -1/2 (/ (* a (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1 (/ (* (pow y-scale 2) (* (+ (* -1 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (/ (* (pow y-scale 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (pow a 4))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2))) (+ (* -1 (/ (* (pow y-scale 6) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))) (pow a 6))) (+ (* 1/2 (/ (* (pow y-scale 2) (* (+ (* -1 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (+ (* 1/4 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (/ (* (pow y-scale 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (pow a 4)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2))) (/ (* (pow y-scale 4) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (pow a 4))))) (+ (* -1 (pow b 2)) (pow b 2)))))) (pow x-scale 2))) (+ (* -1/2 (/ (* a (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (+ (* 1/4 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (/ (* (pow y-scale 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (pow a 4)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2))))))))))) (pow x-scale 2))) (+ (* -1/2 (/ (* (pow y-scale 4) (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (+ (* (pow b 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 2))))) (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))))) (pow a 2)) (+ (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))) (pow a 2))) (/ (* (pow y-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))) (pow a 2))))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))))))) (* (pow a 3) (pow x-scale 2)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (+ (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (+ (* (pow b 2) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))))) (pow y-scale 2)))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- b a) 2)))) (pow y-scale 2))) (/ (* (pow (+ a b) 2) (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- b a) 2))) (pow y-scale 2))))))) (pow a 2)) (+ (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))))) (pow a 2))) (+ (/ (* (pow y-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (+ (* (pow b 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 2))))) (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))))) (pow a 2)) (+ (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))) (pow a 2))) (/ (* (pow y-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))) (pow a 2)))))) (pow a 2)) (/ (* (pow y-scale 2) (* (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))) (pow a 2)))))) (+ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6))))))))) (* a (pow x-scale 2))))))) (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 2) (* (sqrt 8) (- (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 2)))))) (pow a 2))))))) a)))))))))))) |
(+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/4 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (+ (* 1/4 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* a (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))))))) (* (pow b 3) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))))) |
(+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (+ (* 1/4 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* a (+ (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))))) (* (pow b 3) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* a (+ (* 1/8 (+ (* -1/2 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow b 3) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))))) (* 1/8 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))) (* b (sin (* 1/180 (* angle (PI))))))))))))) |
(+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (+ (* 1/4 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* a (+ (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))))) (* (pow b 3) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* a (+ (* 1/8 (* a (+ (* -1 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))))) (* (pow b 5) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (pow b 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))))))) (+ (* 1/8 (+ (* -1/2 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow b 3) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))))) (* 1/8 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))) (* b (sin (* 1/180 (* angle (PI)))))))))))))) |
(* a (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(* a (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (+ (* 1/4 (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))))))) |
(* a (+ (* 1/8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (* (pow a 2) (cos (* 1/180 (* angle (PI))))))) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (+ (* 1/8 (/ (+ (* -1/2 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/4 (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))))))))) |
(* a (+ (* 1/8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (* (pow a 2) (cos (* 1/180 (* angle (PI))))))) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (+ (* 1/8 (/ (+ (* -1 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 b) (* 2 b))))))) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* 4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (+ (* -2 b) (* 2 b)))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (pow a 3))) (+ (* 1/8 (/ (+ (* -1/2 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/4 (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))))))))) |
(* -1 (* a (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))) |
(* -1 (* a (+ (* -1/4 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))) |
(* -1 (* a (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/8 (+ (* -1/2 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (* 1/8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (cos (* 1/180 (* angle (PI))))))) a)) (* 1/4 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) a)) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))) |
(* -1 (* a (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (/ (+ (* -1 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 b) (* 2 b))))))) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* 4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (+ (* -2 b) (* 2 b)))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) a)) (+ (* 1/8 (+ (* -1/2 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (* 1/8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (cos (* 1/180 (* angle (PI)))))))) a)) (* 1/4 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) a)) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))) |
(* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(/ (+ (* 1/8 (* (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* (pow x-scale 2) (* y-scale (* (sqrt 2) (sqrt 8)))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow x-scale 2)) |
(/ (+ (* 1/8 (* (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* (pow x-scale 2) (* y-scale (* (sqrt 2) (sqrt 8)))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow x-scale 2)) |
(/ (+ (* 1/8 (* (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* (pow x-scale 2) (* y-scale (* (sqrt 2) (sqrt 8)))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow x-scale 2)) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) |
(+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) |
(+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(* 2 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) |
(* 2 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) |
(* 2 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) |
(* 2 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) |
(* 2 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) |
(* 2 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) |
(* 2 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) |
(* 2 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) |
(* 2 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) |
(* 2 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) |
(* 2 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) |
(* 2 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) |
2 |
(+ 2 (* -1/16200 (* (pow angle 2) (pow (PI) 2)))) |
(+ 2 (* (pow angle 2) (+ (* -1/16200 (pow (PI) 2)) (* 1/1574640000 (* (pow angle 2) (pow (PI) 4)))))) |
(+ 2 (* (pow angle 2) (+ (* -1/16200 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/382637520000000 (* (pow angle 2) (pow (PI) 6))) (* 1/1574640000 (pow (PI) 4))))))) |
(* 2 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) |
(* 2 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) |
(* 2 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) |
(* 2 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) |
(* 2 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) |
(* 2 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) |
(* 2 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) |
(* 2 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(+ (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))))) |
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) |
(* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))) |
(* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) |
(* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))))) |
(* -1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) |
(* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) |
(* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))))) |
(* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(+ (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))))) |
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) |
(* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) |
(* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) |
(* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))) |
(* -1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) |
(* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) |
(* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))) |
(* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))))) |
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) |
(+ (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) |
(+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))) |
(+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) |
(* -1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) |
(* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) |
(* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))))) |
(* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) |
(+ (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) |
(+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))) |
(+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) |
(* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) |
(* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) |
(* -1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) |
(* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) |
(* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))))) |
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) |
(+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))))))) (* b (sqrt 2)))) (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))) |
(+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))))) (* b (sqrt 2))))))) |
(+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))))) (* b (sqrt 2)))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))))) (* 1/2 (/ (* (pow x-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2)))))))) (* b (sqrt 2))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
1 |
(+ 1 (* -1/16200 (* (pow angle 2) (pow (PI) 2)))) |
(+ 1 (* (pow angle 2) (+ (* -1/16200 (pow (PI) 2)) (* 1/1574640000 (* (pow angle 2) (pow (PI) 4)))))) |
(+ 1 (* (pow angle 2) (+ (* -1/16200 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/382637520000000 (* (pow angle 2) (pow (PI) 6))) (* 1/1574640000 (pow (PI) 4))))))) |
(cos (* 1/90 (* angle (PI)))) |
(cos (* 1/90 (* angle (PI)))) |
(cos (* 1/90 (* angle (PI)))) |
(cos (* 1/90 (* angle (PI)))) |
(cos (* 1/90 (* angle (PI)))) |
(cos (* 1/90 (* angle (PI)))) |
(cos (* 1/90 (* angle (PI)))) |
(cos (* 1/90 (* angle (PI)))) |
| Outputs |
|---|
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) |
(+ (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) |
(fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (*.f64 (*.f64 b b) x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 b b) (*.f64 #s(literal 1/8 binary64) (fma.f64 x-scale (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 (*.f64 (*.f64 b b) x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/8 binary64) (*.f64 x-scale (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) (*.f64 (*.f64 b b) (*.f64 #s(literal 1/8 binary64) (fma.f64 x-scale (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 (*.f64 (*.f64 b b) x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (*.f64 (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))))))) |
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) |
(* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))) |
(*.f64 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (*.f64 b b)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))))) |
(* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) |
(*.f64 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (*.f64 b b)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (pow.f64 b #s(literal 4 binary64))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))))) |
(* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))))) |
(*.f64 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (*.f64 b b)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (*.f64 (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (pow.f64 b #s(literal 6 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (pow.f64 b #s(literal 4 binary64))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))))))) |
(* -1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) |
(*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 b x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) |
(* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) |
(neg.f64 (*.f64 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (*.f64 b b)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))))) |
(* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))))) |
(neg.f64 (*.f64 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (*.f64 b b)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (pow.f64 b #s(literal 4 binary64))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))))))) |
(* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))))) |
(neg.f64 (*.f64 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (*.f64 b b)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (*.f64 (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (pow.f64 b #s(literal 6 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (pow.f64 b #s(literal 4 binary64))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) |
(+ (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) |
(fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (*.f64 (*.f64 a a) x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 a a) (*.f64 #s(literal 1/8 binary64) (fma.f64 x-scale (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 (*.f64 (*.f64 a a) x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/8 binary64) (*.f64 x-scale (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) (*.f64 (*.f64 a a) (*.f64 #s(literal 1/8 binary64) (fma.f64 x-scale (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 (*.f64 (*.f64 a a) x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (*.f64 (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))))))) |
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) |
(* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) |
(*.f64 a (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (*.f64 a a)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))))) |
(* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) |
(*.f64 a (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (*.f64 a a)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (pow.f64 a #s(literal 4 binary64))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))))) |
(* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))) |
(*.f64 a (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (*.f64 a a)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (*.f64 (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (pow.f64 a #s(literal 6 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (pow.f64 a #s(literal 4 binary64))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))))))) |
(* -1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) |
(*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 a x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) |
(* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) |
(neg.f64 (*.f64 a (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (*.f64 a a)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))))) |
(* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))) |
(neg.f64 (*.f64 a (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (*.f64 a a)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (pow.f64 a #s(literal 4 binary64))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))))))) |
(* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))))) |
(neg.f64 (*.f64 a (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (*.f64 a a)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (*.f64 (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (pow.f64 a #s(literal 6 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (pow.f64 a #s(literal 4 binary64))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))))))) |
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) |
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) |
(+ (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) |
(fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) |
(+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 #s(literal 1/8 binary64) (fma.f64 y-scale (*.f64 (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))))))) |
(+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 #s(literal 1/8 binary64) (fma.f64 y-scale (*.f64 (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) |
(*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) |
(*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (pow.f64 x-scale #s(literal 6 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))))) |
(* -1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) |
(* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) |
(neg.f64 (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))) |
(* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) |
(neg.f64 (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))))) |
(* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))))) |
(neg.f64 (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (pow.f64 x-scale #s(literal 6 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))))) |
(* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) |
(+ (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) |
(fma.f64 #s(literal 1/8 binary64) (*.f64 x-scale (*.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) |
(+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 (*.f64 y-scale y-scale) (*.f64 #s(literal 1/8 binary64) (fma.f64 x-scale (*.f64 (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 x-scale (*.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))))))) |
(+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 y-scale y-scale) (*.f64 #s(literal 1/8 binary64) (fma.f64 x-scale (*.f64 (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 x-scale (*.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) |
(* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) |
(*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 y-scale y-scale)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) |
(* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) |
(*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))) |
(* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) |
(*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)))))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (pow.f64 y-scale #s(literal 6 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))))) |
(* -1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) |
(* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) |
(neg.f64 (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 y-scale y-scale)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))) |
(* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) |
(neg.f64 (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))))) |
(* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))))) |
(neg.f64 (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)))))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (pow.f64 y-scale #s(literal 6 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))))) |
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) |
(+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))))))) (* b (sqrt 2)))) (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))) |
(fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 angle angle) (*.f64 x-scale x-scale)) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))))) (*.f64 b (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))) |
(+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))))) (* b (sqrt 2))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (*.f64 angle angle) (*.f64 #s(literal 1/8 binary64) (+.f64 (/.f64 (*.f64 (*.f64 (*.f64 angle angle) (*.f64 x-scale x-scale)) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal -1/787320000 binary64)) (pow.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))))) (*.f64 b (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))))) (*.f64 b (sqrt.f64 #s(literal 2 binary64)))))))) |
(+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))))) (* b (sqrt 2)))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))))) (* 1/2 (/ (* (pow x-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2)))))))) (* b (sqrt 2))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))))) (*.f64 b (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 angle angle) (*.f64 #s(literal 1/8 binary64) (+.f64 (/.f64 (*.f64 (*.f64 (*.f64 angle angle) (*.f64 x-scale x-scale)) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))))) (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (fma.f64 #s(literal 1/102036672000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (+.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal -1/787320000 binary64)) (pow.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))) (*.f64 y-scale y-scale)) (+.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))))) (+.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal -1/787320000 binary64)) (pow.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))))) (*.f64 (*.f64 b b) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))))) (*.f64 b (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal -1/787320000 binary64)) (pow.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))))) (*.f64 b (sqrt.f64 #s(literal 2 binary64)))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) |
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) |
(+ (* 1/8 (/ (* (pow angle 2) (* y-scale (* (sqrt 2) (* (sqrt 8) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))))))) b)) (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))) |
(fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 angle angle) y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64)))))) b) (*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))) |
(+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* y-scale (* (sqrt 2) (* (sqrt 8) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))))) b)) (* 1/8 (/ (* (pow angle 2) (* y-scale (* (sqrt 2) (* (sqrt 8) (- (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (* 1/4 (/ (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2) (pow b 2)))))))) b))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (*.f64 angle angle) (*.f64 #s(literal 1/8 binary64) (+.f64 (/.f64 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64)))))) b) (/.f64 (*.f64 (*.f64 (*.f64 angle angle) y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64)))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))))) (*.f64 b b)))))) b))))) |
(+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* y-scale (* (sqrt 2) (* (sqrt 8) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))))) b)) (* (pow angle 2) (+ (* 1/8 (/ (* y-scale (* (sqrt 2) (* (sqrt 8) (- (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (* 1/4 (/ (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2) (pow b 2))))))) b)) (* 1/8 (/ (* (pow angle 2) (* y-scale (* (sqrt 2) (* (sqrt 8) (- (+ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6))))) (* 1/2 (/ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (- (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (* 1/4 (/ (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2) (pow b 2))))) (pow b 2)))))))) b))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64)))))) b) (*.f64 (*.f64 angle angle) (*.f64 #s(literal 1/8 binary64) (+.f64 (/.f64 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64)))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))))) (*.f64 b b)))))) b) (/.f64 (*.f64 (*.f64 (*.f64 angle angle) y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (fma.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64)))) (+.f64 (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64)))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))))) (*.f64 b b))))) (*.f64 b b)))))) b))))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) |
(* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(+ (* 1/8 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* a (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))) |
(fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 a (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))) |
(+ (* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (* (pow b 2) (+ (* -1/32 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow a 3) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* 1/8 (/ (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (* a (sin (* 1/180 (* angle (PI)))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 a (*.f64 a a)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 y-scale (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 a (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) |
(+ (* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (* (pow b 2) (+ (* 1/8 (/ (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (* a (sin (* 1/180 (* angle (PI))))))) (* (pow b 2) (+ (* -1/32 (/ (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8)))) (* (pow a 3) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* 1/64 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 6) (* (sqrt 2) (sqrt 8))))) (* (pow a 5) (pow (sin (* 1/180 (* angle (PI)))) 5))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 a (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 a (*.f64 a a)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (/.f64 (*.f64 #s(literal 1/64 binary64) (*.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 (pow.f64 a #s(literal 5 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64))))))))) |
(* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(* b (+ (* 1/8 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))) |
(*.f64 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 b b) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))) |
(* b (+ (* -1/32 (/ (* (pow a 4) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/8 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))) |
(*.f64 b (fma.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 b b) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))) |
(* b (+ (* -1/32 (/ (* (pow a 4) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/64 (/ (* (pow a 6) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 6) (* (sqrt 2) (sqrt 8))))) (* (pow b 6) (pow (cos (* 1/180 (* angle (PI)))) 5)))) (+ (* 1/8 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))) |
(*.f64 b (fma.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/64 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 6 binary64)) y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 b b) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))) |
(* -1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 b y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(* -1 (* b (+ (* 1/8 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))) |
(neg.f64 (*.f64 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 b b) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))) |
(* -1 (* b (+ (* -1/32 (/ (* (pow a 4) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/8 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))) |
(neg.f64 (*.f64 b (fma.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 b b) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))) |
(* -1 (* b (+ (* -1/32 (/ (* (pow a 4) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/64 (/ (* (pow a 6) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 6) (* (sqrt 2) (sqrt 8))))) (* (pow b 6) (pow (cos (* 1/180 (* angle (PI)))) 5)))) (+ (* 1/8 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))))) |
(neg.f64 (*.f64 b (fma.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/64 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 6 binary64)) y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 b b) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))))) |
(* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(+ (* 1/8 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* b (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))) |
(fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 b (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))) |
(+ (* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (* (pow a 2) (+ (* -1/32 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow b 3) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (* 1/8 (/ (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (* b (cos (* 1/180 (* angle (PI)))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 b (*.f64 b b)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 b (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) |
(+ (* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (* (pow a 2) (+ (* 1/8 (/ (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (* b (cos (* 1/180 (* angle (PI))))))) (* (pow a 2) (+ (* -1/32 (/ (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8)))) (* (pow b 3) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (* 1/64 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 6) (* (sqrt 2) (sqrt 8))))) (* (pow b 5) (pow (cos (* 1/180 (* angle (PI)))) 5))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 b (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 b (*.f64 b b)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (/.f64 (*.f64 #s(literal 1/64 binary64) (*.f64 (*.f64 (*.f64 a a) y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 (pow.f64 b #s(literal 5 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64))))))))) |
(* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(* a (+ (* 1/8 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))) |
(*.f64 a (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))) |
(* a (+ (* -1/32 (/ (* (pow b 4) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/8 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))) |
(*.f64 a (fma.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))) |
(* a (+ (* -1/32 (/ (* (pow b 4) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/64 (/ (* (pow b 6) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 6) (* (sqrt 2) (sqrt 8))))) (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 5)))) (+ (* 1/8 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))) |
(*.f64 a (fma.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/64 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 6 binary64)) y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))) |
(* -1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 a y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(* -1 (* a (+ (* 1/8 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))) |
(neg.f64 (*.f64 a (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))) |
(* -1 (* a (+ (* -1/32 (/ (* (pow b 4) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/8 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))) |
(neg.f64 (*.f64 a (fma.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))) |
(* -1 (* a (+ (* -1/32 (/ (* (pow b 4) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/64 (/ (* (pow b 6) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 6) (* (sqrt 2) (sqrt 8))))) (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 5)))) (+ (* 1/8 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))))) |
(neg.f64 (*.f64 a (fma.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/64 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 6 binary64)) y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))))) |
(* 1/4 (* y-scale (sqrt 8))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (sqrt.f64 #s(literal 8 binary64))) |
(* 1/4 (* y-scale (sqrt 8))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (sqrt.f64 #s(literal 8 binary64))) |
(* 1/4 (* y-scale (sqrt 8))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (sqrt.f64 #s(literal 8 binary64))) |
(* 1/4 (* y-scale (sqrt 8))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (sqrt.f64 #s(literal 8 binary64))) |
(* 1/4 (* y-scale (sqrt 8))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (sqrt.f64 #s(literal 8 binary64))) |
(* 1/4 (* y-scale (sqrt 8))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (sqrt.f64 #s(literal 8 binary64))) |
(* 1/4 (* y-scale (sqrt 8))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (sqrt.f64 #s(literal 8 binary64))) |
(* 1/4 (* y-scale (sqrt 8))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (sqrt.f64 #s(literal 8 binary64))) |
(* 1/4 (* y-scale (sqrt 8))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (sqrt.f64 #s(literal 8 binary64))) |
(* 1/4 (* y-scale (sqrt 8))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (sqrt.f64 #s(literal 8 binary64))) |
(* 1/4 (* y-scale (sqrt 8))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (sqrt.f64 #s(literal 8 binary64))) |
(* 1/4 (* y-scale (sqrt 8))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (sqrt.f64 #s(literal 8 binary64))) |
(* y-scale (sqrt 8)) |
(*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) |
(* y-scale (sqrt 8)) |
(*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) |
(* y-scale (sqrt 8)) |
(*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) |
(* y-scale (sqrt 8)) |
(*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) |
(* y-scale (sqrt 8)) |
(*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) |
(* y-scale (sqrt 8)) |
(*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) |
(* y-scale (sqrt 8)) |
(*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) |
(* y-scale (sqrt 8)) |
(*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) |
(* y-scale (sqrt 8)) |
(*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) |
(* y-scale (sqrt 8)) |
(*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) |
(* y-scale (sqrt 8)) |
(*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) |
(* y-scale (sqrt 8)) |
(*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) |
(+ (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) |
(fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (*.f64 (*.f64 b b) x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 b b) (*.f64 #s(literal 1/8 binary64) (fma.f64 x-scale (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 (*.f64 (*.f64 b b) x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/8 binary64) (*.f64 x-scale (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) (*.f64 (*.f64 b b) (*.f64 #s(literal 1/8 binary64) (fma.f64 x-scale (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 (*.f64 (*.f64 b b) x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (*.f64 (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))))))) |
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) |
(* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))) |
(*.f64 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (*.f64 b b)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))))) |
(* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) |
(*.f64 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (*.f64 b b)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (pow.f64 b #s(literal 4 binary64))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))))) |
(* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))))) |
(*.f64 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (*.f64 b b)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (*.f64 (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (pow.f64 b #s(literal 6 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (pow.f64 b #s(literal 4 binary64))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))))))) |
(* -1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) |
(*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 b x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) |
(* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) |
(neg.f64 (*.f64 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (*.f64 b b)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))))) |
(* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))))) |
(neg.f64 (*.f64 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (*.f64 b b)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (pow.f64 b #s(literal 4 binary64))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))))))) |
(* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))))) |
(neg.f64 (*.f64 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (*.f64 b b)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (*.f64 (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (pow.f64 b #s(literal 6 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (pow.f64 b #s(literal 4 binary64))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) |
(+ (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) |
(fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (*.f64 (*.f64 a a) x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 a a) (*.f64 #s(literal 1/8 binary64) (fma.f64 x-scale (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 (*.f64 (*.f64 a a) x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/8 binary64) (*.f64 x-scale (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) (*.f64 (*.f64 a a) (*.f64 #s(literal 1/8 binary64) (fma.f64 x-scale (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 (*.f64 (*.f64 a a) x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (*.f64 (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))))))) |
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) |
(* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) |
(*.f64 a (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (*.f64 a a)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))))) |
(* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) |
(*.f64 a (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (*.f64 a a)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (pow.f64 a #s(literal 4 binary64))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))))) |
(* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))) |
(*.f64 a (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (*.f64 a a)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (*.f64 (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (pow.f64 a #s(literal 6 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (pow.f64 a #s(literal 4 binary64))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))))))) |
(* -1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) |
(*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 a x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) |
(* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) |
(neg.f64 (*.f64 a (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (*.f64 a a)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))))) |
(* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))) |
(neg.f64 (*.f64 a (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (*.f64 a a)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (pow.f64 a #s(literal 4 binary64))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))))))) |
(* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))))) |
(neg.f64 (*.f64 a (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (*.f64 a a)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (*.f64 (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (pow.f64 a #s(literal 6 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (pow.f64 a #s(literal 4 binary64))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))))))) |
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) |
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) |
(+ (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) |
(fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) |
(+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 #s(literal 1/8 binary64) (fma.f64 y-scale (*.f64 (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))))))) |
(+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 #s(literal 1/8 binary64) (fma.f64 y-scale (*.f64 (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) |
(*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) |
(*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (pow.f64 x-scale #s(literal 6 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))))) |
(* -1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) |
(* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) |
(neg.f64 (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))) |
(* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) |
(neg.f64 (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))))) |
(* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))))) |
(neg.f64 (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (pow.f64 x-scale #s(literal 6 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))))) |
(* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) |
(+ (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) |
(fma.f64 #s(literal 1/8 binary64) (*.f64 x-scale (*.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) |
(+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 (*.f64 y-scale y-scale) (*.f64 #s(literal 1/8 binary64) (fma.f64 x-scale (*.f64 (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 x-scale (*.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))))))) |
(+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 y-scale y-scale) (*.f64 #s(literal 1/8 binary64) (fma.f64 x-scale (*.f64 (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 x-scale (*.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) |
(* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) |
(*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 y-scale y-scale)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) |
(* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) |
(*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))) |
(* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) |
(*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)))))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (pow.f64 y-scale #s(literal 6 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))))) |
(* -1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) |
(* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) |
(neg.f64 (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 y-scale y-scale)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))) |
(* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) |
(neg.f64 (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))))) |
(* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))))) |
(neg.f64 (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)))))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (pow.f64 y-scale #s(literal 6 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))))) |
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) |
(+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))))))) (* b (sqrt 2)))) (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))) |
(fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 angle angle) (*.f64 x-scale x-scale)) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))))) (*.f64 b (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))) |
(+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))))) (* b (sqrt 2))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (*.f64 angle angle) (*.f64 #s(literal 1/8 binary64) (+.f64 (/.f64 (*.f64 (*.f64 (*.f64 angle angle) (*.f64 x-scale x-scale)) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal -1/787320000 binary64)) (pow.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))))) (*.f64 b (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))))) (*.f64 b (sqrt.f64 #s(literal 2 binary64)))))))) |
(+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))))) (* b (sqrt 2)))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))))) (* 1/2 (/ (* (pow x-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2)))))))) (* b (sqrt 2))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))))) (*.f64 b (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 angle angle) (*.f64 #s(literal 1/8 binary64) (+.f64 (/.f64 (*.f64 (*.f64 (*.f64 angle angle) (*.f64 x-scale x-scale)) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))))) (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (fma.f64 #s(literal 1/102036672000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (+.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal -1/787320000 binary64)) (pow.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))) (*.f64 y-scale y-scale)) (+.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))))) (+.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal -1/787320000 binary64)) (pow.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))))) (*.f64 (*.f64 b b) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))))) (*.f64 b (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal -1/787320000 binary64)) (pow.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))))) (*.f64 b (sqrt.f64 #s(literal 2 binary64)))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) |
(* b y-scale) |
(*.f64 b y-scale) |
(* b y-scale) |
(*.f64 b y-scale) |
(* b y-scale) |
(*.f64 b y-scale) |
(* b y-scale) |
(*.f64 b y-scale) |
(* b y-scale) |
(*.f64 b y-scale) |
(* b y-scale) |
(*.f64 b y-scale) |
(* b y-scale) |
(*.f64 b y-scale) |
(* b y-scale) |
(*.f64 b y-scale) |
(* b y-scale) |
(*.f64 b y-scale) |
(* b y-scale) |
(*.f64 b y-scale) |
(* b y-scale) |
(*.f64 b y-scale) |
(* b y-scale) |
(*.f64 b y-scale) |
(* b y-scale) |
(*.f64 b y-scale) |
(* b y-scale) |
(*.f64 b y-scale) |
(* b y-scale) |
(*.f64 b y-scale) |
(* b y-scale) |
(*.f64 b y-scale) |
(* b y-scale) |
(*.f64 b y-scale) |
(* b y-scale) |
(*.f64 b y-scale) |
(* b y-scale) |
(*.f64 b y-scale) |
(* b y-scale) |
(*.f64 b y-scale) |
(* b y-scale) |
(*.f64 b y-scale) |
(* b y-scale) |
(*.f64 b y-scale) |
(* b y-scale) |
(*.f64 b y-scale) |
(* b y-scale) |
(*.f64 b y-scale) |
(* b y-scale) |
(*.f64 b y-scale) |
(* b y-scale) |
(*.f64 b y-scale) |
(* b y-scale) |
(*.f64 b y-scale) |
(* b y-scale) |
(*.f64 b y-scale) |
(* b y-scale) |
(*.f64 b y-scale) |
(* b y-scale) |
(*.f64 b y-scale) |
(* b y-scale) |
(*.f64 b y-scale) |
(* b y-scale) |
(*.f64 b y-scale) |
(* b y-scale) |
(*.f64 b y-scale) |
(* b y-scale) |
(*.f64 b y-scale) |
(* b y-scale) |
(*.f64 b y-scale) |
(* b y-scale) |
(*.f64 b y-scale) |
(* b y-scale) |
(*.f64 b y-scale) |
(* b y-scale) |
(*.f64 b y-scale) |
(* b y-scale) |
(*.f64 b y-scale) |
(* b y-scale) |
(*.f64 b y-scale) |
(* b y-scale) |
(*.f64 b y-scale) |
(* b y-scale) |
(*.f64 b y-scale) |
(* b y-scale) |
(*.f64 b y-scale) |
(* b y-scale) |
(*.f64 b y-scale) |
(* b y-scale) |
(*.f64 b y-scale) |
(* b y-scale) |
(*.f64 b y-scale) |
(* b y-scale) |
(*.f64 b y-scale) |
(* b y-scale) |
(*.f64 b y-scale) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) |
(+ (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) |
(fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (*.f64 (*.f64 b b) x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 b b) (*.f64 #s(literal 1/8 binary64) (fma.f64 x-scale (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 (*.f64 (*.f64 b b) x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/8 binary64) (*.f64 x-scale (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) (*.f64 (*.f64 b b) (*.f64 #s(literal 1/8 binary64) (fma.f64 x-scale (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 (*.f64 (*.f64 b b) x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (*.f64 (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))))))) |
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) |
(* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))) |
(*.f64 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (*.f64 b b)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))))) |
(* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) |
(*.f64 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (*.f64 b b)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (pow.f64 b #s(literal 4 binary64))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))))) |
(* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))))) |
(*.f64 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (*.f64 b b)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (*.f64 (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (pow.f64 b #s(literal 6 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (pow.f64 b #s(literal 4 binary64))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))))))) |
(* -1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) |
(*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 b x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) |
(* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) |
(neg.f64 (*.f64 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (*.f64 b b)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))))) |
(* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))))) |
(neg.f64 (*.f64 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (*.f64 b b)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (pow.f64 b #s(literal 4 binary64))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))))))) |
(* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))))) |
(neg.f64 (*.f64 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (*.f64 b b)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (*.f64 (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (pow.f64 b #s(literal 6 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (pow.f64 b #s(literal 4 binary64))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) |
(+ (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) |
(fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (*.f64 (*.f64 a a) x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 a a) (*.f64 #s(literal 1/8 binary64) (fma.f64 x-scale (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 (*.f64 (*.f64 a a) x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/8 binary64) (*.f64 x-scale (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) (*.f64 (*.f64 a a) (*.f64 #s(literal 1/8 binary64) (fma.f64 x-scale (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 (*.f64 (*.f64 a a) x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (*.f64 (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))))))) |
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) |
(* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) |
(*.f64 a (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (*.f64 a a)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))))) |
(* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) |
(*.f64 a (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (*.f64 a a)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (pow.f64 a #s(literal 4 binary64))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))))) |
(* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))) |
(*.f64 a (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (*.f64 a a)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (*.f64 (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (pow.f64 a #s(literal 6 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (pow.f64 a #s(literal 4 binary64))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))))))) |
(* -1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) |
(*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 a x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) |
(* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) |
(neg.f64 (*.f64 a (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (*.f64 a a)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))))) |
(* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))) |
(neg.f64 (*.f64 a (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (*.f64 a a)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (pow.f64 a #s(literal 4 binary64))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))))))) |
(* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))))) |
(neg.f64 (*.f64 a (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (*.f64 a a)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (*.f64 (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (pow.f64 a #s(literal 6 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (pow.f64 a #s(literal 4 binary64))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))))))) |
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) |
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) |
(+ (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) |
(fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) |
(+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 #s(literal 1/8 binary64) (fma.f64 y-scale (*.f64 (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))))))) |
(+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 #s(literal 1/8 binary64) (fma.f64 y-scale (*.f64 (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) |
(*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) |
(*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (pow.f64 x-scale #s(literal 6 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))))) |
(* -1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) |
(* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) |
(neg.f64 (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))) |
(* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) |
(neg.f64 (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))))) |
(* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))))) |
(neg.f64 (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (pow.f64 x-scale #s(literal 6 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))))) |
(* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) |
(+ (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) |
(fma.f64 #s(literal 1/8 binary64) (*.f64 x-scale (*.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) |
(+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 (*.f64 y-scale y-scale) (*.f64 #s(literal 1/8 binary64) (fma.f64 x-scale (*.f64 (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 x-scale (*.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))))))) |
(+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 y-scale y-scale) (*.f64 #s(literal 1/8 binary64) (fma.f64 x-scale (*.f64 (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 x-scale (*.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) |
(* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) |
(*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 y-scale y-scale)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) |
(* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) |
(*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))) |
(* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) |
(*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)))))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (pow.f64 y-scale #s(literal 6 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))))) |
(* -1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) |
(* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) |
(neg.f64 (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 y-scale y-scale)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))) |
(* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) |
(neg.f64 (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))))) |
(* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))))) |
(neg.f64 (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)))))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (pow.f64 y-scale #s(literal 6 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))))) |
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) |
(+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))))))) (* b (sqrt 2)))) (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))) |
(fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 angle angle) (*.f64 x-scale x-scale)) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))))) (*.f64 b (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))) |
(+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))))) (* b (sqrt 2))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (*.f64 angle angle) (*.f64 #s(literal 1/8 binary64) (+.f64 (/.f64 (*.f64 (*.f64 (*.f64 angle angle) (*.f64 x-scale x-scale)) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal -1/787320000 binary64)) (pow.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))))) (*.f64 b (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))))) (*.f64 b (sqrt.f64 #s(literal 2 binary64)))))))) |
(+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))))) (* b (sqrt 2)))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))))) (* 1/2 (/ (* (pow x-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2)))))))) (* b (sqrt 2))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))))) (*.f64 b (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 angle angle) (*.f64 #s(literal 1/8 binary64) (+.f64 (/.f64 (*.f64 (*.f64 (*.f64 angle angle) (*.f64 x-scale x-scale)) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))))) (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (fma.f64 #s(literal 1/102036672000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (+.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal -1/787320000 binary64)) (pow.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))) (*.f64 y-scale y-scale)) (+.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))))) (+.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal -1/787320000 binary64)) (pow.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))))) (*.f64 (*.f64 b b) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))))) (*.f64 b (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal -1/787320000 binary64)) (pow.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))))) (*.f64 b (sqrt.f64 #s(literal 2 binary64)))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) |
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) |
(+ (* 1/8 (/ (* (pow angle 2) (* y-scale (* (sqrt 2) (* (sqrt 8) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))))))) b)) (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))) |
(fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 angle angle) y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64)))))) b) (*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))) |
(+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* y-scale (* (sqrt 2) (* (sqrt 8) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))))) b)) (* 1/8 (/ (* (pow angle 2) (* y-scale (* (sqrt 2) (* (sqrt 8) (- (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (* 1/4 (/ (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2) (pow b 2)))))))) b))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (*.f64 angle angle) (*.f64 #s(literal 1/8 binary64) (+.f64 (/.f64 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64)))))) b) (/.f64 (*.f64 (*.f64 (*.f64 angle angle) y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64)))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))))) (*.f64 b b)))))) b))))) |
(+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* y-scale (* (sqrt 2) (* (sqrt 8) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))))) b)) (* (pow angle 2) (+ (* 1/8 (/ (* y-scale (* (sqrt 2) (* (sqrt 8) (- (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (* 1/4 (/ (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2) (pow b 2))))))) b)) (* 1/8 (/ (* (pow angle 2) (* y-scale (* (sqrt 2) (* (sqrt 8) (- (+ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6))))) (* 1/2 (/ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (- (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (* 1/4 (/ (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2) (pow b 2))))) (pow b 2)))))))) b))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64)))))) b) (*.f64 (*.f64 angle angle) (*.f64 #s(literal 1/8 binary64) (+.f64 (/.f64 (*.f64 y-scale (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64)))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))))) (*.f64 b b)))))) b) (/.f64 (*.f64 (*.f64 (*.f64 angle angle) y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (fma.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64)))) (+.f64 (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64)))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))))) (*.f64 b b))))) (*.f64 b b)))))) b))))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) |
(* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(+ (* 1/8 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* a (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))) |
(fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 a (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))) |
(+ (* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (* (pow b 2) (+ (* -1/32 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow a 3) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* 1/8 (/ (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (* a (sin (* 1/180 (* angle (PI)))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 a (*.f64 a a)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 y-scale (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 a (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) |
(+ (* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (* (pow b 2) (+ (* 1/8 (/ (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (* a (sin (* 1/180 (* angle (PI))))))) (* (pow b 2) (+ (* -1/32 (/ (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8)))) (* (pow a 3) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* 1/64 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 6) (* (sqrt 2) (sqrt 8))))) (* (pow a 5) (pow (sin (* 1/180 (* angle (PI)))) 5))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 a (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 a (*.f64 a a)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (/.f64 (*.f64 #s(literal 1/64 binary64) (*.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 (pow.f64 a #s(literal 5 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64))))))))) |
(* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(* b (+ (* 1/8 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))) |
(*.f64 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 b b) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))) |
(* b (+ (* -1/32 (/ (* (pow a 4) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/8 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))) |
(*.f64 b (fma.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 b b) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))) |
(* b (+ (* -1/32 (/ (* (pow a 4) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/64 (/ (* (pow a 6) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 6) (* (sqrt 2) (sqrt 8))))) (* (pow b 6) (pow (cos (* 1/180 (* angle (PI)))) 5)))) (+ (* 1/8 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))) |
(*.f64 b (fma.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/64 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 6 binary64)) y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 b b) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))) |
(* -1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 b y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(* -1 (* b (+ (* 1/8 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))) |
(neg.f64 (*.f64 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 b b) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))) |
(* -1 (* b (+ (* -1/32 (/ (* (pow a 4) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/8 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))) |
(neg.f64 (*.f64 b (fma.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 b b) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))) |
(* -1 (* b (+ (* -1/32 (/ (* (pow a 4) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/64 (/ (* (pow a 6) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 6) (* (sqrt 2) (sqrt 8))))) (* (pow b 6) (pow (cos (* 1/180 (* angle (PI)))) 5)))) (+ (* 1/8 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))))) |
(neg.f64 (*.f64 b (fma.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/64 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 6 binary64)) y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 b b) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))))) |
(* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(+ (* 1/8 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* b (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))) |
(fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 b (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))) |
(+ (* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (* (pow a 2) (+ (* -1/32 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow b 3) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (* 1/8 (/ (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (* b (cos (* 1/180 (* angle (PI)))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 b (*.f64 b b)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 b (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) |
(+ (* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (* (pow a 2) (+ (* 1/8 (/ (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (* b (cos (* 1/180 (* angle (PI))))))) (* (pow a 2) (+ (* -1/32 (/ (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8)))) (* (pow b 3) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (* 1/64 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 6) (* (sqrt 2) (sqrt 8))))) (* (pow b 5) (pow (cos (* 1/180 (* angle (PI)))) 5))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 b (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 b (*.f64 b b)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (/.f64 (*.f64 #s(literal 1/64 binary64) (*.f64 (*.f64 (*.f64 a a) y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 (pow.f64 b #s(literal 5 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64))))))))) |
(* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(* a (+ (* 1/8 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))) |
(*.f64 a (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))) |
(* a (+ (* -1/32 (/ (* (pow b 4) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/8 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))) |
(*.f64 a (fma.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))) |
(* a (+ (* -1/32 (/ (* (pow b 4) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/64 (/ (* (pow b 6) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 6) (* (sqrt 2) (sqrt 8))))) (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 5)))) (+ (* 1/8 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))) |
(*.f64 a (fma.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/64 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 6 binary64)) y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))) |
(* -1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 a y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(* -1 (* a (+ (* 1/8 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))) |
(neg.f64 (*.f64 a (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))) |
(* -1 (* a (+ (* -1/32 (/ (* (pow b 4) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/8 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))) |
(neg.f64 (*.f64 a (fma.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))) |
(* -1 (* a (+ (* -1/32 (/ (* (pow b 4) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (sqrt 2) (sqrt 8))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/64 (/ (* (pow b 6) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 6) (* (sqrt 2) (sqrt 8))))) (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 5)))) (+ (* 1/8 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))))) |
(neg.f64 (*.f64 a (fma.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/64 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 6 binary64)) y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))))) |
(* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(* 1/720 (* a (* angle (* y-scale (* (PI) (* (sqrt 2) (sqrt 8))))))) |
(*.f64 (*.f64 #s(literal 1/720 binary64) a) (*.f64 (*.f64 angle y-scale) (*.f64 (*.f64 (PI.f64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))) |
(* angle (+ (* -1/139968000 (* a (* (pow angle 2) (* y-scale (* (pow (PI) 3) (* (sqrt 2) (sqrt 8))))))) (* 1/720 (* a (* y-scale (* (PI) (* (sqrt 2) (sqrt 8)))))))) |
(*.f64 angle (fma.f64 (*.f64 #s(literal -1/139968000 binary64) a) (*.f64 (*.f64 (*.f64 angle angle) y-scale) (*.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 #s(literal 1/720 binary64) a) (*.f64 (*.f64 y-scale (PI.f64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))) |
(* angle (+ (* 1/720 (* a (* y-scale (* (PI) (* (sqrt 2) (sqrt 8)))))) (* (pow angle 2) (+ (* -1/139968000 (* a (* y-scale (* (pow (PI) 3) (* (sqrt 2) (sqrt 8)))))) (* 1/90699264000000 (* a (* (pow angle 2) (* y-scale (* (pow (PI) 5) (* (sqrt 2) (sqrt 8))))))))))) |
(*.f64 angle (fma.f64 #s(literal 1/720 binary64) (*.f64 a (*.f64 (*.f64 y-scale (PI.f64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 angle angle) (fma.f64 (*.f64 #s(literal -1/139968000 binary64) a) (*.f64 y-scale (*.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 #s(literal 1/90699264000000 binary64) a) (*.f64 (*.f64 (*.f64 angle angle) y-scale) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))))) |
(* angle (+ (* 1/720 (* a (* y-scale (* (PI) (* (sqrt 2) (sqrt 8)))))) (* (pow angle 2) (+ (* -1/139968000 (* a (* y-scale (* (pow (PI) 3) (* (sqrt 2) (sqrt 8)))))) (* (pow angle 2) (+ (* -1/123423558451200000000 (* a (* (pow angle 2) (* y-scale (* (pow (PI) 7) (* (sqrt 2) (sqrt 8))))))) (* 1/90699264000000 (* a (* y-scale (* (pow (PI) 5) (* (sqrt 2) (sqrt 8)))))))))))) |
(*.f64 angle (fma.f64 #s(literal 1/720 binary64) (*.f64 a (*.f64 (*.f64 y-scale (PI.f64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/139968000 binary64) (*.f64 (*.f64 a y-scale) (*.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 angle angle) (fma.f64 (*.f64 #s(literal -1/123423558451200000000 binary64) a) (*.f64 (*.f64 (*.f64 angle angle) y-scale) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 #s(literal 1/90699264000000 binary64) (*.f64 (*.f64 a y-scale) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))))))) |
(* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) |
(*.f64 (*.f64 a y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) |
(*.f64 (*.f64 a y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) |
(*.f64 (*.f64 a y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) |
(*.f64 (*.f64 a y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) |
(*.f64 (*.f64 a y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) |
(*.f64 (*.f64 a y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) |
(*.f64 (*.f64 a y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) |
(*.f64 (*.f64 a y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) |
(*.f64 (*.f64 a y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) |
(*.f64 (*.f64 a y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) |
(*.f64 (*.f64 a y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) |
(*.f64 (*.f64 a y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) |
(*.f64 (*.f64 a y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) |
(*.f64 (*.f64 a y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) |
(*.f64 (*.f64 a y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) |
(*.f64 (*.f64 a y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) |
(*.f64 (*.f64 a y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) |
(*.f64 (*.f64 a y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) |
(*.f64 (*.f64 a y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) |
(*.f64 (*.f64 a y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) |
(*.f64 (*.f64 a y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) |
(*.f64 (*.f64 a y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) |
(*.f64 (*.f64 a y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) |
(*.f64 (*.f64 a y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(* 1/180 (* a (* angle (* y-scale (* (PI) (* (sqrt 2) (sqrt 8))))))) |
(*.f64 (*.f64 #s(literal 1/180 binary64) a) (*.f64 (*.f64 angle y-scale) (*.f64 (*.f64 (PI.f64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))) |
(* angle (+ (* -1/34992000 (* a (* (pow angle 2) (* y-scale (* (pow (PI) 3) (* (sqrt 2) (sqrt 8))))))) (* 1/180 (* a (* y-scale (* (PI) (* (sqrt 2) (sqrt 8)))))))) |
(*.f64 angle (fma.f64 (*.f64 #s(literal -1/34992000 binary64) a) (*.f64 (*.f64 (*.f64 angle angle) y-scale) (*.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 #s(literal 1/180 binary64) a) (*.f64 (*.f64 y-scale (PI.f64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))) |
(* angle (+ (* 1/180 (* a (* y-scale (* (PI) (* (sqrt 2) (sqrt 8)))))) (* (pow angle 2) (+ (* -1/34992000 (* a (* y-scale (* (pow (PI) 3) (* (sqrt 2) (sqrt 8)))))) (* 1/22674816000000 (* a (* (pow angle 2) (* y-scale (* (pow (PI) 5) (* (sqrt 2) (sqrt 8))))))))))) |
(*.f64 angle (fma.f64 #s(literal 1/180 binary64) (*.f64 a (*.f64 (*.f64 y-scale (PI.f64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 angle angle) (fma.f64 (*.f64 #s(literal -1/34992000 binary64) a) (*.f64 y-scale (*.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 #s(literal 1/22674816000000 binary64) a) (*.f64 (*.f64 (*.f64 angle angle) y-scale) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))))) |
(* angle (+ (* 1/180 (* a (* y-scale (* (PI) (* (sqrt 2) (sqrt 8)))))) (* (pow angle 2) (+ (* -1/34992000 (* a (* y-scale (* (pow (PI) 3) (* (sqrt 2) (sqrt 8)))))) (* (pow angle 2) (+ (* -1/30855889612800000000 (* a (* (pow angle 2) (* y-scale (* (pow (PI) 7) (* (sqrt 2) (sqrt 8))))))) (* 1/22674816000000 (* a (* y-scale (* (pow (PI) 5) (* (sqrt 2) (sqrt 8)))))))))))) |
(*.f64 angle (fma.f64 #s(literal 1/180 binary64) (*.f64 a (*.f64 (*.f64 y-scale (PI.f64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/34992000 binary64) (*.f64 (*.f64 a y-scale) (*.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/30855889612800000000 binary64) (*.f64 a (*.f64 (*.f64 (*.f64 angle angle) y-scale) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 (*.f64 a y-scale) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))))))) |
(* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) |
(*.f64 (*.f64 a y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) |
(*.f64 (*.f64 a y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) |
(*.f64 (*.f64 a y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) |
(*.f64 (*.f64 a y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) |
(*.f64 (*.f64 a y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) |
(*.f64 (*.f64 a y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) |
(*.f64 (*.f64 a y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) |
(*.f64 (*.f64 a y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) |
(/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) |
(+ (* (pow a 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) |
(fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) |
(+ (* (pow a 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) |
(fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) |
(+ (* (pow a 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) |
(fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) |
(* (pow a 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))) |
(*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) |
(* (pow a 2) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) (pow y-scale 2)))))) |
(*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) |
(* (pow a 2) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) (pow y-scale 2)))))) |
(*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) |
(* (pow a 2) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) (pow y-scale 2)))))) |
(*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) |
(* (pow a 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))) |
(*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) |
(* (pow a 2) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) (pow y-scale 2)))))) |
(*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) |
(* (pow a 2) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) (pow y-scale 2)))))) |
(*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) |
(* (pow a 2) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) (pow y-scale 2)))))) |
(*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) |
(/ (pow a 2) (pow y-scale 2)) |
(/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) |
(+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (pow a 2) (pow y-scale 2))) |
(fma.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) |
(+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2)))))))) (/ (pow a 2) (pow y-scale 2))) |
(fma.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 y-scale y-scale)))))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) |
(+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))) (* (pow angle 2) (+ (* -1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow y-scale 2))) (* 1/765275040000000 (/ (* (pow b 2) (pow (PI) 6)) (pow y-scale 2))))))))))) (/ (pow a 2) (pow y-scale 2))) |
(fma.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/765275040000000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/765275040000000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 y-scale y-scale)))))))))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) |
(+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) |
(+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) |
(+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) |
(+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) |
(+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) |
(+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) |
(+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) |
(+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) |
(+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) |
(+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) |
(+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) |
(+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) |
(+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) |
(+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) |
(+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) |
(+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) |
(/ (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2)) |
(/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 y-scale y-scale)) |
(/ (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2)) |
(/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 y-scale y-scale)) |
(/ (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2)) |
(/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 y-scale y-scale)) |
(/ (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2)) |
(/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 y-scale y-scale)) |
(/ (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2)) |
(/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 y-scale y-scale)) |
(/ (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2)) |
(/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 y-scale y-scale)) |
(/ (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2)) |
(/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 y-scale y-scale)) |
(/ (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2)) |
(/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 y-scale y-scale)) |
(/ (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2)) |
(/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 y-scale y-scale)) |
(/ (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2)) |
(/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 y-scale y-scale)) |
(/ (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2)) |
(/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 y-scale y-scale)) |
(/ (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2)) |
(/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 y-scale y-scale)) |
(/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) |
(/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) |
(+ (* (pow b 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) |
(fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) |
(+ (* (pow b 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) |
(fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) |
(+ (* (pow b 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) |
(fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) |
(* (pow b 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))) |
(*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) |
(* (pow b 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (pow y-scale 2)))))) |
(*.f64 (*.f64 b b) (+.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (*.f64 y-scale y-scale))))) |
(* (pow b 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (pow y-scale 2)))))) |
(*.f64 (*.f64 b b) (+.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (*.f64 y-scale y-scale))))) |
(* (pow b 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (pow y-scale 2)))))) |
(*.f64 (*.f64 b b) (+.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (*.f64 y-scale y-scale))))) |
(* (pow b 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))) |
(*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) |
(* (pow b 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (pow y-scale 2)))))) |
(*.f64 (*.f64 b b) (+.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (*.f64 y-scale y-scale))))) |
(* (pow b 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (pow y-scale 2)))))) |
(*.f64 (*.f64 b b) (+.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (*.f64 y-scale y-scale))))) |
(* (pow b 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (pow y-scale 2)))))) |
(*.f64 (*.f64 b b) (+.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (*.f64 y-scale y-scale))))) |
1 |
#s(literal 1 binary64) |
(+ 1 (* -1/32400 (* (pow angle 2) (pow (PI) 2)))) |
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 angle angle)) (*.f64 (PI.f64) (PI.f64)))) |
(+ 1 (* (pow angle 2) (+ (* -1/32400 (pow (PI) 2)) (* 1/3149280000 (* (pow angle 2) (pow (PI) 4)))))) |
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 #s(literal 1/3149280000 binary64) (*.f64 angle angle)) (pow.f64 (PI.f64) #s(literal 4 binary64)))))) |
(+ 1 (* (pow angle 2) (+ (* -1/32400 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/765275040000000 (* (pow angle 2) (pow (PI) 6))) (* 1/3149280000 (pow (PI) 4))))))) |
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/765275040000000 binary64) (*.f64 (*.f64 angle angle) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) |
(+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) |
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) |
(+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) |
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) |
(+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) |
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) |
(+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) |
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) |
(+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) |
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) |
(+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) |
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) |
(+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) |
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) |
(+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) |
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) |
(* 1/32400 (* (pow angle 2) (pow (PI) 2))) |
(*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 angle angle)) (*.f64 (PI.f64) (PI.f64))) |
(* (pow angle 2) (+ (* -1/3149280000 (* (pow angle 2) (pow (PI) 4))) (* 1/32400 (pow (PI) 2)))) |
(*.f64 (*.f64 angle angle) (fma.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 angle angle)) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64))))) |
(* (pow angle 2) (+ (* 1/32400 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/3149280000 (pow (PI) 4)) (* 1/765275040000000 (* (pow angle 2) (pow (PI) 6))))))) |
(*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 #s(literal 1/765275040000000 binary64) (*.f64 angle angle)) (pow.f64 (PI.f64) #s(literal 6 binary64))))))) |
(* (pow angle 2) (+ (* 1/32400 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/3149280000 (pow (PI) 4)) (* (pow angle 2) (+ (* -1/347128758144000000000 (* (pow angle 2) (pow (PI) 8))) (* 1/765275040000000 (pow (PI) 6)))))))) |
(*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 angle angle) (fma.f64 (*.f64 #s(literal -1/347128758144000000000 binary64) (*.f64 angle angle)) (pow.f64 (PI.f64) #s(literal 8 binary64)) (*.f64 #s(literal 1/765275040000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))))))) |
(+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) |
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) |
(+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) |
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) |
(+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) |
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) |
(+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) |
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) |
(+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) |
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) |
(+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) |
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) |
(+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) |
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) |
(+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) |
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))) |
(+ (* 1/16 (* (/ (* a (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) |
(fma.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 a (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64))))) (*.f64 x-scale y-scale))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))) (* a (+ (* 1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* 1/8 (* (* a (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (+ (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (sqrt (/ 1 (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))) (*.f64 a (fma.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64)))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (*.f64 a x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64)) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64)) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64)))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))) (* a (+ (* 1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* a (+ (* 1/8 (* (* a (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 (pow b 3)) (* 2 (pow b 3))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (* 1/4 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 (pow b 3)) (* 2 (pow b 3))) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (+ (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))) (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (+ (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))) (sqrt (/ 1 (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))) (*.f64 a (fma.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64)))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 a (*.f64 #s(literal 1/8 binary64) (fma.f64 (*.f64 (*.f64 a x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b #s(literal 0 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64))) (-.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64)) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64)) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64)) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64)))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))) (*.f64 x-scale (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64)) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64)) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64)))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))))))))))) |
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)))))) |
(* a (+ (* 1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))) (* a (* x-scale y-scale))) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) |
(*.f64 a (fma.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 b #s(literal 0 binary64)))) (*.f64 a (*.f64 x-scale y-scale))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)))))))) |
(* a (+ (* 1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))) (* a (* x-scale y-scale))) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))))))) (pow a 2)) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))))) |
(*.f64 a (fma.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 b #s(literal 0 binary64)))) (*.f64 a (*.f64 x-scale y-scale))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 b #s(literal 0 binary64)) (*.f64 b #s(literal 0 binary64))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 b #s(literal 0 binary64)) (*.f64 b #s(literal 0 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)))))))) (*.f64 a a)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))))))))) |
(* a (+ (* 1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))) (* a (* x-scale y-scale))) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 b) (* 2 b)) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (* 1/4 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 b) (* 2 b)) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))))))) (pow a 3)) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))))))) (pow a 2)) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))))) |
(*.f64 a (fma.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 b #s(literal 0 binary64)))) (*.f64 a (*.f64 x-scale y-scale))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b #s(literal 0 binary64))) (-.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 b #s(literal 0 binary64)) (*.f64 b #s(literal 0 binary64))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b #s(literal 0 binary64))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 b #s(literal 0 binary64)) (*.f64 b #s(literal 0 binary64))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 b #s(literal 0 binary64)) (*.f64 b #s(literal 0 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))))))) (*.f64 a (*.f64 a a))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 b #s(literal 0 binary64)) (*.f64 b #s(literal 0 binary64))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 b #s(literal 0 binary64)) (*.f64 b #s(literal 0 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)))))))) (*.f64 a a)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)))))))))) |
(* -1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) |
(*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 a x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)))))) |
(* -1 (* a (+ (* -1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))) (* a (* x-scale y-scale))) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))))) |
(neg.f64 (*.f64 a (fma.f64 (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 b #s(literal 0 binary64)))) (*.f64 a (*.f64 x-scale y-scale)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))))))))) |
(* -1 (* a (+ (* -1 (/ (+ (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))))))) a) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))) (* 1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))))) a)) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))))) |
(neg.f64 (*.f64 a (+.f64 (neg.f64 (/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 b #s(literal 0 binary64)) (*.f64 b #s(literal 0 binary64))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 b #s(literal 0 binary64)) (*.f64 b #s(literal 0 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)))))))) a) (*.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 b #s(literal 0 binary64)))) (*.f64 x-scale y-scale))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))))))))) a)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))))))))) |
(* -1 (* a (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 b) (* 2 b)) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (* 1/4 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 b) (* 2 b)) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))))))) a) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))) (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))))))) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) a)) (* 1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))))) a)) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))))) |
(neg.f64 (*.f64 a (+.f64 (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b #s(literal 0 binary64))) (-.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 b #s(literal 0 binary64)) (*.f64 b #s(literal 0 binary64))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b #s(literal 0 binary64))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 b #s(literal 0 binary64)) (*.f64 b #s(literal 0 binary64))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 b #s(literal 0 binary64)) (*.f64 b #s(literal 0 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))))))) a) (*.f64 #s(literal 1/8 binary64) (*.f64 x-scale (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 b #s(literal 0 binary64)) (*.f64 b #s(literal 0 binary64))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 b #s(literal 0 binary64)) (*.f64 b #s(literal 0 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)))))))))) a)) (*.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 b #s(literal 0 binary64)))) (*.f64 x-scale y-scale))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))))))))) a)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))))) |
(+ (* 1/16 (* (/ (* b (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) |
(fma.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 b (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64))))) (*.f64 x-scale y-scale))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* b (+ (* 1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* 1/8 (* (* b (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (+ (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (sqrt (/ 1 (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))))) (*.f64 b (fma.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64)))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (*.f64 b x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (-.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64)) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64)) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64)))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* b (+ (* 1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* b (+ (* 1/8 (* (* b (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 (pow a 3)) (* 2 (pow a 3))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (* 1/4 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 (pow a 3)) (* 2 (pow a 3))) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (+ (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (+ (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (sqrt (/ 1 (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))))) (*.f64 b (fma.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64)))) (*.f64 x-scale y-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 b (*.f64 #s(literal 1/8 binary64) (fma.f64 (*.f64 (*.f64 b x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a #s(literal 0 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64))) (-.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64)) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (-.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64)) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64)) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64)))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))))) (*.f64 x-scale (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (-.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64)) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64)) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64)))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))))))))))))) |
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))))) |
(* b (+ (* 1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))) (* b (* x-scale y-scale))) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) |
(*.f64 b (fma.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 b (*.f64 x-scale y-scale)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))))))) |
(* b (+ (* 1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))) (* b (* x-scale y-scale))) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))))))) (pow b 2)) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))))) |
(*.f64 b (fma.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 b (*.f64 x-scale y-scale))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))))) (-.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 a #s(literal 0 binary64)) (*.f64 a #s(literal 0 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 a #s(literal 0 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))))))) (*.f64 b b)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))))))) |
(* b (+ (* 1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))) (* b (* x-scale y-scale))) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 a) (* 2 a)) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (* 1/4 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 a) (* 2 a)) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))))))) (pow b 3)) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))))))) (pow b 2)) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))))) |
(*.f64 b (fma.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 b (*.f64 x-scale y-scale))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a #s(literal 0 binary64))) (-.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 a #s(literal 0 binary64)) (*.f64 a #s(literal 0 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a #s(literal 0 binary64))) (+.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))))) (-.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 a #s(literal 0 binary64)) (*.f64 a #s(literal 0 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 a #s(literal 0 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))))) (*.f64 b (*.f64 b b))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))))) (-.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 a #s(literal 0 binary64)) (*.f64 a #s(literal 0 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 a #s(literal 0 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))))))) (*.f64 b b)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))))))))) |
(* -1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))) |
(*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 b x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))))) |
(* -1 (* b (+ (* -1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))) (* b (* x-scale y-scale))) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))))) |
(neg.f64 (*.f64 b (fma.f64 (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 b (*.f64 x-scale y-scale)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))))))) |
(* -1 (* b (+ (* -1 (/ (+ (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))))))) b) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (* 1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))))) b)) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))))) |
(neg.f64 (*.f64 b (+.f64 (neg.f64 (/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))))) (-.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 a #s(literal 0 binary64)) (*.f64 a #s(literal 0 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 a #s(literal 0 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))))))) b) (*.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 x-scale y-scale))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))))))) b)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))))))) |
(* -1 (* b (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 a) (* 2 a)) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (* 1/4 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 a) (* 2 a)) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))))))) b) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* 1/16 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))))))) (sqrt (/ 1 (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) b)) (* 1/16 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))))) b)) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))))) |
(neg.f64 (*.f64 b (+.f64 (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a #s(literal 0 binary64))) (-.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 a #s(literal 0 binary64)) (*.f64 a #s(literal 0 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a #s(literal 0 binary64))) (+.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))))) (-.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 a #s(literal 0 binary64)) (*.f64 a #s(literal 0 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 a #s(literal 0 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))))) b) (*.f64 #s(literal 1/8 binary64) (*.f64 x-scale (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))))) (-.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 a #s(literal 0 binary64)) (*.f64 a #s(literal 0 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 a #s(literal 0 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))))))))) b)) (*.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 x-scale y-scale))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))))))) b)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))))))) |
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))) |
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))) |
(+ (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) |
(fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))))) (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))))) |
(+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 #s(literal 1/8 binary64) (fma.f64 y-scale (*.f64 (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))))))))) |
(+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 #s(literal 1/8 binary64) (fma.f64 y-scale (*.f64 (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) #s(literal 2 binary64)))))) (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))))) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))) |
(*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) |
(*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))) (pow x-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))))) |
(*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))))) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))) (pow.f64 x-scale #s(literal 6 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))))))) |
(* -1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))) |
(*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))) |
(* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) |
(neg.f64 (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))))) |
(* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))))) |
(neg.f64 (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))))))) |
(* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))) (pow x-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))))) |
(neg.f64 (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))))) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))) (pow.f64 x-scale #s(literal 6 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))))))) |
(* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))) |
(+ (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) |
(fma.f64 #s(literal 1/8 binary64) (*.f64 x-scale (*.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))))) |
(+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))) (*.f64 (*.f64 y-scale y-scale) (*.f64 #s(literal 1/8 binary64) (fma.f64 x-scale (*.f64 (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))))) (*.f64 x-scale (*.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))))))))) |
(+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))))) (*.f64 (*.f64 y-scale y-scale) (*.f64 #s(literal 1/8 binary64) (fma.f64 x-scale (*.f64 (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))))) (*.f64 x-scale (*.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) #s(literal 2 binary64)))))) (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))))) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))))) |
(* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))) |
(*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))) (*.f64 y-scale y-scale)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))))))) |
(* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) |
(*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))))) |
(* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))) (pow y-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))))) |
(*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)))))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))))))) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))) (pow.f64 y-scale #s(literal 6 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))))))))) |
(* -1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) |
(*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))))) |
(* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) |
(neg.f64 (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))) (*.f64 y-scale y-scale)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))))) |
(* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))))) |
(neg.f64 (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))))))))) |
(* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))) (pow y-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2) (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))))) |
(neg.f64 (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)))))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))))))) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))) (pow.f64 y-scale #s(literal 6 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))))))) |
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) |
(+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))))))) (* b (sqrt 2)))) (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))) |
(fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 angle angle) (*.f64 x-scale x-scale)) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))))) (*.f64 b (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))) |
(+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/2 (/ (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))))) (* b (sqrt 2))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (*.f64 angle angle) (*.f64 #s(literal 1/8 binary64) (+.f64 (/.f64 (*.f64 (*.f64 angle angle) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (fma.f64 #s(literal -1/196830000 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (pow.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))))))) (*.f64 b (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))))) (*.f64 b (sqrt.f64 #s(literal 2 binary64)))))))) |
(+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))))) (* b (sqrt 2)))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow y-scale 2))) (+ (* -1/765275040000000 (/ (* (pow b 2) (pow (PI) 6)) (pow x-scale 2))) (+ (* 1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow x-scale 2))) (+ (* 1/765275040000000 (/ (* (pow b 2) (pow (PI) 6)) (pow y-scale 2))) (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))))) (+ (* 2 (* (- (+ (* -1/765275040000000 (/ (* (pow b 2) (pow (PI) 6)) (pow x-scale 2))) (* 1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow x-scale 2)))) (+ (* -1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow y-scale 2))) (* 1/765275040000000 (/ (* (pow b 2) (pow (PI) 6)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow (+ a b) 2) (* (+ (* 1/31886460000000 (pow (PI) 6)) (* 1/19131876000000 (pow (PI) 6))) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (* 1/2 (/ (* (pow x-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/2 (/ (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/2 (/ (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2)))))))) (* b (sqrt 2))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))))) (*.f64 b (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 angle angle) (*.f64 #s(literal 1/8 binary64) (+.f64 (/.f64 (*.f64 (*.f64 angle angle) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (fma.f64 #s(literal -1/765275040000000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/765275040000000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/765275040000000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/765275040000000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 y-scale y-scale))))) (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/765275040000000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal 1/765275040000000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/765275040000000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/765275040000000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/11957422500000 binary64)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (+.f64 (fma.f64 #s(literal -1/196830000 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (pow.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))))) (+.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (fma.f64 #s(literal -1/196830000 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (pow.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))))) (*.f64 (*.f64 b b) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))))))) (*.f64 b (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (fma.f64 #s(literal -1/196830000 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (pow.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))))) (*.f64 b (sqrt.f64 #s(literal 2 binary64)))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))))) |
(* 1/180 (* angle (PI))) |
(*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) |
(* angle (+ (* -1/34992000 (* (pow angle 2) (pow (PI) 3))) (* 1/180 (PI)))) |
(*.f64 angle (fma.f64 (*.f64 #s(literal -1/34992000 binary64) (*.f64 angle angle)) (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/180 binary64) (PI.f64)))) |
(* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* 1/22674816000000 (* (pow angle 2) (pow (PI) 5))))))) |
(*.f64 angle (fma.f64 #s(literal 1/180 binary64) (PI.f64) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/34992000 binary64) (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 angle angle)) (pow.f64 (PI.f64) #s(literal 5 binary64))))))) |
(* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* (pow angle 2) (+ (* -1/30855889612800000000 (* (pow angle 2) (pow (PI) 7))) (* 1/22674816000000 (pow (PI) 5)))))))) |
(*.f64 angle (fma.f64 #s(literal 1/180 binary64) (PI.f64) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/34992000 binary64) (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 angle angle) (fma.f64 (*.f64 #s(literal -1/30855889612800000000 binary64) (*.f64 angle angle)) (pow.f64 (PI.f64) #s(literal 7 binary64)) (*.f64 #s(literal 1/22674816000000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))))))))) |
(sin (* 1/180 (* angle (PI)))) |
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
(sin (* 1/180 (* angle (PI)))) |
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
(sin (* 1/180 (* angle (PI)))) |
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
(sin (* 1/180 (* angle (PI)))) |
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
(sin (* 1/180 (* angle (PI)))) |
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
(sin (* 1/180 (* angle (PI)))) |
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
(sin (* 1/180 (* angle (PI)))) |
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
(sin (* 1/180 (* angle (PI)))) |
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
(/ 2 (pow y-scale 2)) |
(/.f64 #s(literal 2 binary64) (*.f64 y-scale y-scale)) |
(+ (* -1/16200 (/ (* (pow angle 2) (pow (PI) 2)) (pow y-scale 2))) (* 2 (/ 1 (pow y-scale 2)))) |
(fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 angle angle) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 #s(literal 2 binary64) (*.f64 y-scale y-scale))) |
(+ (* (pow angle 2) (+ (* -1/16200 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/1574640000 (/ (* (pow angle 2) (pow (PI) 4)) (pow y-scale 2))))) (* 2 (/ 1 (pow y-scale 2)))) |
(fma.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/1574640000 binary64) (*.f64 angle angle)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale))) (/.f64 #s(literal 2 binary64) (*.f64 y-scale y-scale))) |
(+ (* (pow angle 2) (+ (* -1/16200 (/ (pow (PI) 2) (pow y-scale 2))) (* (pow angle 2) (+ (* -1/382637520000000 (/ (* (pow angle 2) (pow (PI) 6)) (pow y-scale 2))) (* 1/1574640000 (/ (pow (PI) 4) (pow y-scale 2))))))) (* 2 (/ 1 (pow y-scale 2)))) |
(fma.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/382637520000000 binary64) (/.f64 (*.f64 (*.f64 angle angle) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/1574640000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale))))) (/.f64 #s(literal 2 binary64) (*.f64 y-scale y-scale))) |
(* 2 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow y-scale 2))) |
(/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) |
(* 2 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow y-scale 2))) |
(/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) |
(* 2 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow y-scale 2))) |
(/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) |
(* 2 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow y-scale 2))) |
(/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) |
(* 2 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow y-scale 2))) |
(/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) |
(* 2 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow y-scale 2))) |
(/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) |
(* 2 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow y-scale 2))) |
(/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) |
(* 2 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow y-scale 2))) |
(/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) |
(* 2 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow y-scale 2))) |
(/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) |
(* 2 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow y-scale 2))) |
(/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) |
(* 2 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow y-scale 2))) |
(/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) |
(* 2 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow y-scale 2))) |
(/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) |
(* 2 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow y-scale 2))) |
(/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) |
(* 2 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow y-scale 2))) |
(/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) |
(* 2 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow y-scale 2))) |
(/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) |
(* 2 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow y-scale 2))) |
(/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) |
(* 2 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow y-scale 2))) |
(/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) |
(* 2 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow y-scale 2))) |
(/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) |
(* 2 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow y-scale 2))) |
(/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) |
(* 2 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow y-scale 2))) |
(/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) |
(+ 1 (cos (* 1/90 (* angle (PI))))) |
(+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) |
(+ 1 (cos (* 1/90 (* angle (PI))))) |
(+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) |
(+ 1 (cos (* 1/90 (* angle (PI))))) |
(+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) |
(+ 1 (cos (* 1/90 (* angle (PI))))) |
(+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) |
(+ 1 (cos (* 1/90 (* angle (PI))))) |
(+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) |
(+ 1 (cos (* 1/90 (* angle (PI))))) |
(+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) |
(+ 1 (cos (* 1/90 (* angle (PI))))) |
(+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) |
(+ 1 (cos (* 1/90 (* angle (PI))))) |
(+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) |
(+ 1 (cos (* 1/90 (* angle (PI))))) |
(+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) |
(+ 1 (cos (* 1/90 (* angle (PI))))) |
(+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) |
(+ 1 (cos (* 1/90 (* angle (PI))))) |
(+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) |
(+ 1 (cos (* 1/90 (* angle (PI))))) |
(+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) |
2 |
#s(literal 2 binary64) |
(+ 2 (* -1/16200 (* (pow angle 2) (pow (PI) 2)))) |
(+.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal -1/16200 binary64) (*.f64 angle angle)) (*.f64 (PI.f64) (PI.f64)))) |
(+ 2 (* (pow angle 2) (+ (* -1/16200 (pow (PI) 2)) (* 1/1574640000 (* (pow angle 2) (pow (PI) 4)))))) |
(+.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/16200 binary64) (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 #s(literal 1/1574640000 binary64) (*.f64 angle angle)) (pow.f64 (PI.f64) #s(literal 4 binary64)))))) |
(+ 2 (* (pow angle 2) (+ (* -1/16200 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/382637520000000 (* (pow angle 2) (pow (PI) 6))) (* 1/1574640000 (pow (PI) 4))))))) |
(+.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/16200 binary64) (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 angle angle) (fma.f64 (*.f64 #s(literal -1/382637520000000 binary64) (*.f64 angle angle)) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal 1/1574640000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) |
(+ 1 (cos (* 1/90 (* angle (PI))))) |
(+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) |
(+ 1 (cos (* 1/90 (* angle (PI))))) |
(+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) |
(+ 1 (cos (* 1/90 (* angle (PI))))) |
(+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) |
(+ 1 (cos (* 1/90 (* angle (PI))))) |
(+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) |
(+ 1 (cos (* 1/90 (* angle (PI))))) |
(+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) |
(+ 1 (cos (* 1/90 (* angle (PI))))) |
(+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) |
(+ 1 (cos (* 1/90 (* angle (PI))))) |
(+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) |
(+ 1 (cos (* 1/90 (* angle (PI))))) |
(+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) |
(* 1/90 (* angle (PI))) |
(*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))) |
(* 1/90 (* angle (PI))) |
(*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))) |
(* 1/90 (* angle (PI))) |
(*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))) |
(* 1/90 (* angle (PI))) |
(*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))) |
(* 1/90 (* angle (PI))) |
(*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))) |
(* 1/90 (* angle (PI))) |
(*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))) |
(* 1/90 (* angle (PI))) |
(*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))) |
(* 1/90 (* angle (PI))) |
(*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))) |
(* 1/90 (* angle (PI))) |
(*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))) |
(* 1/90 (* angle (PI))) |
(*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))) |
(* 1/90 (* angle (PI))) |
(*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))) |
(* 1/90 (* angle (PI))) |
(*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))) |
(* b (sqrt 2)) |
(*.f64 b (sqrt.f64 #s(literal 2 binary64))) |
(+ (* 1/2 (/ (* (pow angle 2) (* (sqrt 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))))) b)) (* b (sqrt 2))) |
(fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 angle angle) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))))) b) (*.f64 b (sqrt.f64 #s(literal 2 binary64)))) |
(+ (* b (sqrt 2)) (* (pow angle 2) (+ (* 1/2 (/ (* (sqrt 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) b)) (* 1/2 (/ (* (pow angle 2) (* (sqrt 2) (- (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (* 1/4 (/ (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2) (pow b 2)))))) b))))) |
(fma.f64 b (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 angle angle) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))))) b) (/.f64 (*.f64 (*.f64 (*.f64 angle angle) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64)))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))))) (*.f64 b b))))) b))))) |
(+ (* b (sqrt 2)) (* (pow angle 2) (+ (* 1/2 (/ (* (sqrt 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) b)) (* (pow angle 2) (+ (* 1/2 (/ (* (sqrt 2) (- (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (* 1/4 (/ (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2) (pow b 2))))) b)) (* 1/2 (/ (* (pow angle 2) (* (sqrt 2) (- (+ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6))))) (* 1/2 (/ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (- (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (* 1/4 (/ (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2) (pow b 2))))) (pow b 2)))))) b))))))) |
(fma.f64 b (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))))) b) (*.f64 (*.f64 angle angle) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64)))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))))) (*.f64 b b))))) b) (/.f64 (*.f64 (*.f64 (*.f64 angle angle) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (fma.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64)))) (+.f64 (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64)))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))))) (*.f64 b b))))) (*.f64 b b))))) b))))))) |
(* (sqrt 2) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) |
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) |
(* (sqrt 2) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) |
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) |
(* (sqrt 2) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) |
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) |
(* (sqrt 2) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) |
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) |
(* (sqrt 2) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) |
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) |
(* (sqrt 2) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) |
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) |
(* (sqrt 2) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) |
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) |
(* (sqrt 2) (sqrt (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) |
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) |
(* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))) |
(*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))) |
(+ (* 1/2 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (sqrt 2))) (* a (sin (* 1/180 (* angle (PI))))))) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) |
(fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) |
(+ (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))) (* (pow b 2) (+ (* -1/8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (sqrt 2))) (* (pow a 3) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* 1/2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (sqrt 2)) (* a (sin (* 1/180 (* angle (PI)))))))))) |
(fma.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a (*.f64 a a)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) |
(+ (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))) (* (pow b 2) (+ (* 1/2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (sqrt 2)) (* a (sin (* 1/180 (* angle (PI))))))) (* (pow b 2) (+ (* -1/8 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (sqrt 2)) (* (pow a 3) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* 1/16 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 6) (sqrt 2))) (* (pow a 5) (pow (sin (* 1/180 (* angle (PI)))) 5))))))))) |
(fma.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a (*.f64 a a)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 5 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)))))))))) |
(* b (* (cos (* 1/180 (* angle (PI)))) (sqrt 2))) |
(*.f64 b (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))) |
(* b (+ (* 1/2 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 2))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* (cos (* 1/180 (* angle (PI)))) (sqrt 2)))) |
(*.f64 b (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 b b) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) |
(* b (+ (* -1/8 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 2))) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/2 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 2))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* (cos (* 1/180 (* angle (PI)))) (sqrt 2))))) |
(*.f64 b (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 b b) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))) |
(* b (+ (* -1/8 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 2))) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/16 (/ (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (sqrt 2))) (* (pow b 6) (pow (cos (* 1/180 (* angle (PI)))) 5)))) (+ (* 1/2 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 2))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* (cos (* 1/180 (* angle (PI)))) (sqrt 2)))))) |
(*.f64 b (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 b b) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))) |
(* -1 (* b (* (cos (* 1/180 (* angle (PI)))) (sqrt 2)))) |
(neg.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) |
(* -1 (* b (+ (* 1/2 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 2))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* (cos (* 1/180 (* angle (PI)))) (sqrt 2))))) |
(neg.f64 (*.f64 b (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 b b) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))) |
(* -1 (* b (+ (* -1/8 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 2))) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/2 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 2))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* (cos (* 1/180 (* angle (PI)))) (sqrt 2)))))) |
(neg.f64 (*.f64 b (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 b b) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))) |
(* -1 (* b (+ (* -1/8 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 2))) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/16 (/ (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (sqrt 2))) (* (pow b 6) (pow (cos (* 1/180 (* angle (PI)))) 5)))) (+ (* 1/2 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 2))) (* (pow b 2) (cos (* 1/180 (* angle (PI))))))) (* (cos (* 1/180 (* angle (PI)))) (sqrt 2))))))) |
(neg.f64 (*.f64 b (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 b b) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))) |
(* b (* (cos (* 1/180 (* angle (PI)))) (sqrt 2))) |
(*.f64 b (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))) |
(+ (* 1/2 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 2))) (* b (cos (* 1/180 (* angle (PI))))))) (* b (* (cos (* 1/180 (* angle (PI)))) (sqrt 2)))) |
(fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 b (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 b (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) |
(+ (* b (* (cos (* 1/180 (* angle (PI)))) (sqrt 2))) (* (pow a 2) (+ (* -1/8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 2))) (* (pow b 3) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (* 1/2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 2)) (* b (cos (* 1/180 (* angle (PI)))))))))) |
(fma.f64 b (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 b (*.f64 b b)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 b (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) |
(+ (* b (* (cos (* 1/180 (* angle (PI)))) (sqrt 2))) (* (pow a 2) (+ (* 1/2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 2)) (* b (cos (* 1/180 (* angle (PI))))))) (* (pow a 2) (+ (* -1/8 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 2)) (* (pow b 3) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (* 1/16 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (sqrt 2))) (* (pow b 5) (pow (cos (* 1/180 (* angle (PI)))) 5))))))))) |
(fma.f64 b (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 b (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 b (*.f64 b b)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (/.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 5 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64))))))))) |
(* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))) |
(*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))) |
(* a (+ (* 1/2 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (sqrt 2))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) |
(*.f64 a (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) |
(* a (+ (* -1/8 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (sqrt 2))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/2 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (sqrt 2))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) |
(*.f64 a (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))) |
(* a (+ (* -1/8 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (sqrt 2))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/16 (/ (* (pow b 6) (* (pow (cos (* 1/180 (* angle (PI)))) 6) (sqrt 2))) (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 5)))) (+ (* 1/2 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (sqrt 2))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))) |
(*.f64 a (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 6 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))) |
(* -1 (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) |
(neg.f64 (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) |
(* -1 (* a (+ (* 1/2 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (sqrt 2))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) |
(neg.f64 (*.f64 a (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))) |
(* -1 (* a (+ (* -1/8 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (sqrt 2))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/2 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (sqrt 2))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))) |
(neg.f64 (*.f64 a (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))) |
(* -1 (* a (+ (* -1/8 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (sqrt 2))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/16 (/ (* (pow b 6) (* (pow (cos (* 1/180 (* angle (PI)))) 6) (sqrt 2))) (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 5)))) (+ (* 1/2 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (sqrt 2))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))) |
(neg.f64 (*.f64 a (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 6 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))) |
(* 1/180 (* angle (PI))) |
(*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) |
(* angle (+ (* -1/34992000 (* (pow angle 2) (pow (PI) 3))) (* 1/180 (PI)))) |
(*.f64 angle (fma.f64 (*.f64 #s(literal -1/34992000 binary64) (*.f64 angle angle)) (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/180 binary64) (PI.f64)))) |
(* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* 1/22674816000000 (* (pow angle 2) (pow (PI) 5))))))) |
(*.f64 angle (fma.f64 #s(literal 1/180 binary64) (PI.f64) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/34992000 binary64) (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 angle angle)) (pow.f64 (PI.f64) #s(literal 5 binary64))))))) |
(* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* (pow angle 2) (+ (* -1/30855889612800000000 (* (pow angle 2) (pow (PI) 7))) (* 1/22674816000000 (pow (PI) 5)))))))) |
(*.f64 angle (fma.f64 #s(literal 1/180 binary64) (PI.f64) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/34992000 binary64) (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 angle angle) (fma.f64 (*.f64 #s(literal -1/30855889612800000000 binary64) (*.f64 angle angle)) (pow.f64 (PI.f64) #s(literal 7 binary64)) (*.f64 #s(literal 1/22674816000000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))))))))) |
(sin (* 1/180 (* angle (PI)))) |
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
(sin (* 1/180 (* angle (PI)))) |
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
(sin (* 1/180 (* angle (PI)))) |
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
(sin (* 1/180 (* angle (PI)))) |
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
(sin (* 1/180 (* angle (PI)))) |
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
(sin (* 1/180 (* angle (PI)))) |
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
(sin (* 1/180 (* angle (PI)))) |
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
(sin (* 1/180 (* angle (PI)))) |
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
1 |
#s(literal 1 binary64) |
(+ 1 (* -1/32400 (* (pow angle 2) (pow (PI) 2)))) |
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 angle angle)) (*.f64 (PI.f64) (PI.f64)))) |
(+ 1 (* (pow angle 2) (+ (* -1/32400 (pow (PI) 2)) (* (pow angle 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) |
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 angle angle) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)))))) |
(+ 1 (* (pow angle 2) (+ (* -1/32400 (pow (PI) 2)) (* (pow angle 2) (+ (* 1/12597120000 (pow (PI) 4)) (+ (* 1/4199040000 (pow (PI) 4)) (* (pow angle 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))))))))) |
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 angle angle) (fma.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64) (*.f64 (*.f64 angle angle) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64)))))))) |
(pow (cos (* 1/180 (* angle (PI)))) 2) |
(pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) |
(pow (cos (* 1/180 (* angle (PI)))) 2) |
(pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) |
(pow (cos (* 1/180 (* angle (PI)))) 2) |
(pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) |
(pow (cos (* 1/180 (* angle (PI)))) 2) |
(pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) |
(pow (cos (* 1/180 (* angle (PI)))) 2) |
(pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) |
(pow (cos (* 1/180 (* angle (PI)))) 2) |
(pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) |
(pow (cos (* 1/180 (* angle (PI)))) 2) |
(pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) |
(pow (cos (* 1/180 (* angle (PI)))) 2) |
(pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) |
1 |
#s(literal 1 binary64) |
(+ 1 (* -1/16200 (* (pow angle 2) (pow (PI) 2)))) |
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/16200 binary64) (*.f64 angle angle)) (*.f64 (PI.f64) (PI.f64)))) |
(+ 1 (* (pow angle 2) (+ (* -1/16200 (pow (PI) 2)) (* 1/1574640000 (* (pow angle 2) (pow (PI) 4)))))) |
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/16200 binary64) (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 #s(literal 1/1574640000 binary64) (*.f64 angle angle)) (pow.f64 (PI.f64) #s(literal 4 binary64)))))) |
(+ 1 (* (pow angle 2) (+ (* -1/16200 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/382637520000000 (* (pow angle 2) (pow (PI) 6))) (* 1/1574640000 (pow (PI) 4))))))) |
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/16200 binary64) (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 angle angle) (fma.f64 (*.f64 #s(literal -1/382637520000000 binary64) (*.f64 angle angle)) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal 1/1574640000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) |
(cos (* 1/90 (* angle (PI)))) |
(cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) |
(cos (* 1/90 (* angle (PI)))) |
(cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) |
(cos (* 1/90 (* angle (PI)))) |
(cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) |
(cos (* 1/90 (* angle (PI)))) |
(cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) |
(cos (* 1/90 (* angle (PI)))) |
(cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) |
(cos (* 1/90 (* angle (PI)))) |
(cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) |
(cos (* 1/90 (* angle (PI)))) |
(cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) |
(cos (* 1/90 (* angle (PI)))) |
(cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) |
(* (/ (* b (sqrt 2)) y-scale) (sqrt (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) |
(*.f64 (/.f64 (*.f64 b (sqrt.f64 #s(literal 2 binary64))) y-scale) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) |
(+ (* 1/2 (* (/ (* (pow a 2) (* y-scale (* (sqrt 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) b) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (* (/ (* b (sqrt 2)) y-scale) (sqrt (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))) |
(fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) b) (*.f64 (/.f64 (*.f64 b (sqrt.f64 #s(literal 2 binary64))) y-scale) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) |
(+ (* (/ (* b (sqrt 2)) y-scale) (sqrt (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 2) (+ (* -1/8 (* (/ (* (pow a 2) (* (pow y-scale 3) (* (sqrt 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (pow b 3)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 3))))) (* 1/2 (* (/ (* y-scale (* (sqrt 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) b) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))))))) |
(fma.f64 (/.f64 (*.f64 b (sqrt.f64 #s(literal 2 binary64))) y-scale) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (*.f64 y-scale (*.f64 y-scale y-scale)) (sqrt.f64 #s(literal 2 binary64))) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) #s(literal 3 binary64))))) (*.f64 b (*.f64 b b))) (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) b)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))))) |
(+ (* (/ (* b (sqrt 2)) y-scale) (sqrt (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 2) (+ (* 1/2 (* (/ (* y-scale (* (sqrt 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) b) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (* (pow a 2) (+ (* -1/8 (* (/ (* (pow y-scale 3) (* (sqrt 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (pow b 3)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 3))))) (* 1/16 (* (/ (* (pow a 2) (* (pow y-scale 5) (* (sqrt 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 3)))) (pow b 5)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 5)))))))))) |
(fma.f64 (/.f64 (*.f64 b (sqrt.f64 #s(literal 2 binary64))) y-scale) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) b) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 y-scale (*.f64 y-scale y-scale)) (sqrt.f64 #s(literal 2 binary64))) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) #s(literal 3 binary64))))) (*.f64 b (*.f64 b b))) (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (pow.f64 y-scale #s(literal 5 binary64)) (sqrt.f64 #s(literal 2 binary64))) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) #s(literal 3 binary64)))) (pow.f64 b #s(literal 5 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) #s(literal 5 binary64))))))))))) |
(* (* a (sqrt 2)) (sqrt (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) |
(*.f64 (*.f64 a (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))))) |
(* a (+ (* 1/2 (* (/ (* (pow b 2) (* (sqrt 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 2) (pow y-scale 2))) (sqrt (/ 1 (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (* (sqrt 2) (sqrt (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) |
(*.f64 a (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 b b) (sqrt.f64 #s(literal 2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))))))) |
(* a (+ (* -1/8 (* (/ (* (pow b 4) (* (sqrt 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2))) (* (pow a 4) (pow y-scale 4))) (sqrt (/ 1 (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 3))))) (+ (* 1/2 (* (/ (* (pow b 2) (* (sqrt 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 2) (pow y-scale 2))) (sqrt (/ 1 (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (* (sqrt 2) (sqrt (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))))) |
(*.f64 a (fma.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 #s(literal 2 binary64))) (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 b b) (sqrt.f64 #s(literal 2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))))))) |
(* a (+ (* -1/8 (* (/ (* (pow b 4) (* (sqrt 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2))) (* (pow a 4) (pow y-scale 4))) (sqrt (/ 1 (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 3))))) (+ (* 1/16 (* (/ (* (pow b 6) (* (sqrt 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 3))) (* (pow a 6) (pow y-scale 6))) (sqrt (/ 1 (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 5))))) (+ (* 1/2 (* (/ (* (pow b 2) (* (sqrt 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 2) (pow y-scale 2))) (sqrt (/ 1 (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (* (sqrt 2) (sqrt (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))))) |
(*.f64 a (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 #s(literal 2 binary64))) (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) #s(literal 3 binary64))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 6 binary64)) (sqrt.f64 #s(literal 2 binary64))) (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) #s(literal 3 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) #s(literal 5 binary64))))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 y-scale #s(literal 6 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 b b) (sqrt.f64 #s(literal 2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))))))))) |
(* -1 (* (* a (sqrt 2)) (sqrt (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) |
(neg.f64 (*.f64 (*.f64 a (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))))) |
(* -1 (* a (+ (* 1/2 (* (/ (* (pow b 2) (* (sqrt 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 2) (pow y-scale 2))) (sqrt (/ 1 (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (* (sqrt 2) (sqrt (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))))) |
(neg.f64 (*.f64 a (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 b b) (sqrt.f64 #s(literal 2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))))))) |
(* -1 (* a (+ (* -1/8 (* (/ (* (pow b 4) (* (sqrt 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2))) (* (pow a 4) (pow y-scale 4))) (sqrt (/ 1 (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 3))))) (+ (* 1/2 (* (/ (* (pow b 2) (* (sqrt 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 2) (pow y-scale 2))) (sqrt (/ 1 (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (* (sqrt 2) (sqrt (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))))) |
(neg.f64 (*.f64 a (fma.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 #s(literal 2 binary64))) (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 b b) (sqrt.f64 #s(literal 2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))))))))) |
(* -1 (* a (+ (* -1/8 (* (/ (* (pow b 4) (* (sqrt 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2))) (* (pow a 4) (pow y-scale 4))) (sqrt (/ 1 (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 3))))) (+ (* 1/16 (* (/ (* (pow b 6) (* (sqrt 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 3))) (* (pow a 6) (pow y-scale 6))) (sqrt (/ 1 (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 5))))) (+ (* 1/2 (* (/ (* (pow b 2) (* (sqrt 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 2) (pow y-scale 2))) (sqrt (/ 1 (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (* (sqrt 2) (sqrt (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))))))) |
(neg.f64 (*.f64 a (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 #s(literal 2 binary64))) (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) #s(literal 3 binary64))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 6 binary64)) (sqrt.f64 #s(literal 2 binary64))) (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) #s(literal 3 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) #s(literal 5 binary64))))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 y-scale #s(literal 6 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 b b) (sqrt.f64 #s(literal 2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))))))))) |
(/ (* a (sqrt 2)) y-scale) |
(/.f64 (*.f64 a (sqrt.f64 #s(literal 2 binary64))) y-scale) |
(+ (* 1/2 (/ (* (pow angle 2) (* y-scale (* (sqrt 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))))) a)) (/ (* a (sqrt 2)) y-scale)) |
(fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 angle angle) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))) a) (/.f64 (*.f64 a (sqrt.f64 #s(literal 2 binary64))) y-scale)) |
(+ (* (pow angle 2) (+ (* 1/2 (/ (* y-scale (* (sqrt 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) a)) (* 1/2 (/ (* (pow angle 2) (* y-scale (* (sqrt 2) (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2)))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 2))))))) a)))) (/ (* a (sqrt 2)) y-scale)) |
(fma.f64 (*.f64 angle angle) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) a) (/.f64 (*.f64 (*.f64 angle angle) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (+.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))) (*.f64 a a)))))) a))) (/.f64 (*.f64 a (sqrt.f64 #s(literal 2 binary64))) y-scale)) |
(+ (* (pow angle 2) (+ (* 1/2 (/ (* y-scale (* (sqrt 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) a)) (* (pow angle 2) (+ (* 1/2 (/ (* y-scale (* (sqrt 2) (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2)))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 2)))))) a)) (* 1/2 (/ (* (pow angle 2) (* y-scale (* (sqrt 2) (- (+ (* -1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow y-scale 2))) (* 1/765275040000000 (/ (* (pow b 2) (pow (PI) 6)) (pow y-scale 2)))) (* 1/2 (/ (* (pow y-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2)))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 2)))))) (pow a 2))))))) a)))))) (/ (* a (sqrt 2)) y-scale)) |
(fma.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) a) (*.f64 (*.f64 angle angle) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (+.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))) (*.f64 a a))))) a) (/.f64 (*.f64 (*.f64 angle angle) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (+.f64 (fma.f64 #s(literal -1/765275040000000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/765275040000000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (+.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))) (*.f64 a a))))) (*.f64 a a)))))) a))))) (/.f64 (*.f64 a (sqrt.f64 #s(literal 2 binary64))) y-scale)) |
(* (sqrt 2) (sqrt (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) |
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))) |
(* (sqrt 2) (sqrt (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) |
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))) |
(* (sqrt 2) (sqrt (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) |
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))) |
(* (sqrt 2) (sqrt (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) |
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))) |
(* (sqrt 2) (sqrt (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) |
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))) |
(* (sqrt 2) (sqrt (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) |
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))) |
(* (sqrt 2) (sqrt (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) |
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))) |
(* (sqrt 2) (sqrt (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) |
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))) |
(* (/ (sqrt 2) y-scale) (sqrt (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) |
(*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) y-scale) (sqrt.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))) |
(* (/ (sqrt 2) y-scale) (sqrt (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) |
(*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) y-scale) (sqrt.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))) |
(* (/ (sqrt 2) y-scale) (sqrt (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) |
(*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) y-scale) (sqrt.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))) |
(* (/ (sqrt 2) y-scale) (sqrt (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) |
(*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) y-scale) (sqrt.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))) |
(* (/ (sqrt 2) y-scale) (sqrt (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) |
(*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) y-scale) (sqrt.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))) |
(* (/ (sqrt 2) y-scale) (sqrt (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) |
(*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) y-scale) (sqrt.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))) |
(* (/ (sqrt 2) y-scale) (sqrt (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) |
(*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) y-scale) (sqrt.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))) |
(* (/ (sqrt 2) y-scale) (sqrt (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) |
(*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) y-scale) (sqrt.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))) |
(* -1 (* (/ (sqrt 2) y-scale) (sqrt (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))))) |
(neg.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) y-scale) (sqrt.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))) |
(* -1 (* (/ (sqrt 2) y-scale) (sqrt (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))))) |
(neg.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) y-scale) (sqrt.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))) |
(* -1 (* (/ (sqrt 2) y-scale) (sqrt (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))))) |
(neg.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) y-scale) (sqrt.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))) |
(* -1 (* (/ (sqrt 2) y-scale) (sqrt (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))))) |
(neg.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) y-scale) (sqrt.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))) |
(* (/ (* a (sqrt 2)) y-scale) (sqrt (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) |
(*.f64 (/.f64 (*.f64 a (sqrt.f64 #s(literal 2 binary64))) y-scale) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) |
(+ (* 1/2 (* (/ (* (pow b 2) (* y-scale (* (sqrt 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) a) (sqrt (/ 1 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (* (/ (* a (sqrt 2)) y-scale) (sqrt (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) |
(fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))))) a) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (/.f64 (*.f64 a (sqrt.f64 #s(literal 2 binary64))) y-scale) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) |
(+ (* (/ (* a (sqrt 2)) y-scale) (sqrt (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow b 2) (+ (* -1/8 (* (/ (* (pow b 2) (* (pow y-scale 3) (* (sqrt 2) (pow (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (pow a 3)) (sqrt (/ 1 (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 3))))) (* 1/2 (* (/ (* y-scale (* (sqrt 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) a) (sqrt (/ 1 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) |
(fma.f64 (/.f64 (*.f64 a (sqrt.f64 #s(literal 2 binary64))) y-scale) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (*.f64 y-scale (*.f64 y-scale y-scale)) (sqrt.f64 #s(literal 2 binary64))) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) #s(literal 3 binary64))))) (*.f64 a (*.f64 a a))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) a))))) |
(+ (* (/ (* a (sqrt 2)) y-scale) (sqrt (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow b 2) (+ (* 1/2 (* (/ (* y-scale (* (sqrt 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) a) (sqrt (/ 1 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (* (pow b 2) (+ (* -1/8 (* (/ (* (pow y-scale 3) (* (sqrt 2) (pow (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (pow a 3)) (sqrt (/ 1 (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 3))))) (* 1/16 (* (/ (* (pow b 2) (* (pow y-scale 5) (* (sqrt 2) (pow (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 3)))) (pow a 5)) (sqrt (/ 1 (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 5)))))))))) |
(fma.f64 (/.f64 (*.f64 a (sqrt.f64 #s(literal 2 binary64))) y-scale) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) a) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 y-scale (*.f64 y-scale y-scale)) (sqrt.f64 #s(literal 2 binary64))) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) #s(literal 3 binary64))))) (*.f64 a (*.f64 a a))) (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (pow.f64 y-scale #s(literal 5 binary64)) (sqrt.f64 #s(literal 2 binary64))) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) #s(literal 3 binary64)))) (pow.f64 a #s(literal 5 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) #s(literal 5 binary64))))))))))) |
(* (* b (sqrt 2)) (sqrt (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) |
(*.f64 (*.f64 b (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))))) |
(* b (+ (* 1/2 (* (/ (* (pow a 2) (* (sqrt 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow b 2) (pow y-scale 2))) (sqrt (/ 1 (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (* (sqrt 2) (sqrt (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) |
(*.f64 b (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 a a) (sqrt.f64 #s(literal 2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 b b) (*.f64 y-scale y-scale))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))))))) |
(* b (+ (* -1/8 (* (/ (* (pow a 4) (* (sqrt 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2))) (* (pow b 4) (pow y-scale 4))) (sqrt (/ 1 (pow (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 3))))) (+ (* 1/2 (* (/ (* (pow a 2) (* (sqrt 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow b 2) (pow y-scale 2))) (sqrt (/ 1 (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (* (sqrt 2) (sqrt (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))))) |
(*.f64 b (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 #s(literal 2 binary64))) (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) #s(literal 3 binary64))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 a a) (sqrt.f64 #s(literal 2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 b b) (*.f64 y-scale y-scale))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))))))) |
(* b (+ (* -1/8 (* (/ (* (pow a 4) (* (sqrt 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2))) (* (pow b 4) (pow y-scale 4))) (sqrt (/ 1 (pow (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 3))))) (+ (* 1/16 (* (/ (* (pow a 6) (* (sqrt 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 3))) (* (pow b 6) (pow y-scale 6))) (sqrt (/ 1 (pow (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 5))))) (+ (* 1/2 (* (/ (* (pow a 2) (* (sqrt 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow b 2) (pow y-scale 2))) (sqrt (/ 1 (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (* (sqrt 2) (sqrt (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))))) |
(*.f64 b (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 #s(literal 2 binary64))) (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) #s(literal 3 binary64))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (fma.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 6 binary64)) (sqrt.f64 #s(literal 2 binary64))) (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) #s(literal 3 binary64))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 y-scale #s(literal 6 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) #s(literal 5 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 a a) (sqrt.f64 #s(literal 2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 b b) (*.f64 y-scale y-scale))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))))))))) |
(* -1 (* (* b (sqrt 2)) (sqrt (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) |
(neg.f64 (*.f64 (*.f64 b (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))))) |
(* -1 (* b (+ (* 1/2 (* (/ (* (pow a 2) (* (sqrt 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow b 2) (pow y-scale 2))) (sqrt (/ 1 (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (* (sqrt 2) (sqrt (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))))) |
(neg.f64 (*.f64 b (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 a a) (sqrt.f64 #s(literal 2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 b b) (*.f64 y-scale y-scale))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))))))) |
(* -1 (* b (+ (* -1/8 (* (/ (* (pow a 4) (* (sqrt 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2))) (* (pow b 4) (pow y-scale 4))) (sqrt (/ 1 (pow (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 3))))) (+ (* 1/2 (* (/ (* (pow a 2) (* (sqrt 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow b 2) (pow y-scale 2))) (sqrt (/ 1 (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (* (sqrt 2) (sqrt (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))))) |
(neg.f64 (*.f64 b (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 #s(literal 2 binary64))) (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) #s(literal 3 binary64))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 a a) (sqrt.f64 #s(literal 2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 b b) (*.f64 y-scale y-scale))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))))))))) |
(* -1 (* b (+ (* -1/8 (* (/ (* (pow a 4) (* (sqrt 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2))) (* (pow b 4) (pow y-scale 4))) (sqrt (/ 1 (pow (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 3))))) (+ (* 1/16 (* (/ (* (pow a 6) (* (sqrt 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 3))) (* (pow b 6) (pow y-scale 6))) (sqrt (/ 1 (pow (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 5))))) (+ (* 1/2 (* (/ (* (pow a 2) (* (sqrt 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow b 2) (pow y-scale 2))) (sqrt (/ 1 (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (* (sqrt 2) (sqrt (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))))))) |
(neg.f64 (*.f64 b (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 #s(literal 2 binary64))) (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) #s(literal 3 binary64))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (fma.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 6 binary64)) (sqrt.f64 #s(literal 2 binary64))) (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) #s(literal 3 binary64))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 y-scale #s(literal 6 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) #s(literal 5 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 a a) (sqrt.f64 #s(literal 2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 b b) (*.f64 y-scale y-scale))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))))))))) |
(* 1/4 (* (* (sqrt 2) (sqrt 8)) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) |
(+ (* 1/8 (* (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* 1/4 (* (* (sqrt 2) (sqrt 8)) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) |
(fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) |
(+ (* 1/8 (* (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* 1/4 (* (* (sqrt 2) (sqrt 8)) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) |
(fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) |
(+ (* 1/8 (* (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* 1/4 (* (* (sqrt 2) (sqrt 8)) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) |
(fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) |
(* 1/8 (* (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) |
(*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) |
(* (pow y-scale 2) (+ (* 1/8 (* (/ (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* 1/4 (* (/ (* (sqrt 2) (sqrt 8)) (pow y-scale 2)) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) |
(*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) |
(* (pow y-scale 2) (+ (* 1/8 (* (/ (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* 1/4 (* (/ (* (sqrt 2) (sqrt 8)) (pow y-scale 2)) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) |
(*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) |
(* (pow y-scale 2) (+ (* 1/8 (* (/ (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* 1/4 (* (/ (* (sqrt 2) (sqrt 8)) (pow y-scale 2)) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) |
(*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) |
(* -1/8 (* (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) |
(*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) |
(* (pow y-scale 2) (+ (* -1/4 (* (/ (* (sqrt 2) (sqrt 8)) (pow y-scale 2)) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* -1/8 (* (/ (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) |
(*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))))) |
(* (pow y-scale 2) (+ (* -1/4 (* (/ (* (sqrt 2) (sqrt 8)) (pow y-scale 2)) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* -1/8 (* (/ (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) |
(*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))))) |
(* (pow y-scale 2) (+ (* -1/4 (* (/ (* (sqrt 2) (sqrt 8)) (pow y-scale 2)) (sqrt (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* -1/8 (* (/ (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) |
(*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))))) |
(+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (* 1/4 (* a (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 a (*.f64 x-scale x-scale)) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (+ (* 1/4 (* a (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* b (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))))))) (* (pow a 3) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))))) |
(fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 a (*.f64 x-scale x-scale)) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (fma.f64 a (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (/.f64 (*.f64 b (*.f64 (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64))))) (*.f64 (*.f64 a (*.f64 a a)) (*.f64 (*.f64 x-scale x-scale) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) |
(+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (+ (* 1/4 (* a (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* b (+ (* 1/4 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))))) (* (pow a 3) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (* b (+ (* 1/8 (+ (* -1/2 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow a 3) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 3))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))))) (* 1/8 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))) (* a (cos (* 1/180 (* angle (PI))))))))))))) |
(fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 a (*.f64 x-scale x-scale)) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 b (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64)))) (*.f64 (*.f64 a (*.f64 a a)) (*.f64 (*.f64 x-scale x-scale) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 b (*.f64 #s(literal 1/8 binary64) (+.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 x-scale x-scale)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (*.f64 a (*.f64 x-scale x-scale)) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 a (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))))) |
(+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (+ (* 1/4 (* a (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* b (+ (* 1/4 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))))) (* (pow a 3) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (* b (+ (* 1/8 (* b (+ (* -1 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))))) (* (pow a 5) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 3))))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (pow a 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))))))) (+ (* 1/8 (+ (* -1/2 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow a 3) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 3))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))))) (* 1/8 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))) (* a (cos (* 1/180 (* angle (PI)))))))))))))) |
(fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 a (*.f64 x-scale x-scale)) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 b (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64)))) (*.f64 (*.f64 a (*.f64 a a)) (*.f64 (*.f64 x-scale x-scale) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 b (fma.f64 #s(literal 1/8 binary64) (*.f64 b (+.f64 (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64)))) (*.f64 (*.f64 (pow.f64 a #s(literal 5 binary64)) (*.f64 x-scale x-scale)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a #s(literal 0 binary64))) (*.f64 a a)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (*.f64 (*.f64 a (*.f64 x-scale x-scale)) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/8 binary64) (+.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 x-scale x-scale)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (*.f64 a (*.f64 x-scale x-scale)) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 a (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))))) |
(* b (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(*.f64 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))) |
(* b (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))))))) |
(*.f64 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (fma.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (/.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 a #s(literal 0 binary64))))) (*.f64 (*.f64 b (*.f64 x-scale x-scale)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) |
(* b (+ (* 1/8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (* (pow b 2) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/8 (/ (+ (* -1/2 (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (pow b 2))) (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))))))))) |
(*.f64 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 b b) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64))))) (*.f64 y-scale y-scale)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 b b)) (*.f64 #s(literal 1/4 binary64) (fma.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (/.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 a #s(literal 0 binary64))))) (*.f64 (*.f64 b (*.f64 x-scale x-scale)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) |
(* b (+ (* 1/8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (* (pow b 2) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/8 (/ (+ (* -1 (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 a) (* 2 a))))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* 4 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (+ (* -2 a) (* 2 a)))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (pow b 3))) (+ (* 1/8 (/ (+ (* -1/2 (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (pow b 2))) (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))))))))) |
(*.f64 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 b b) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (+.f64 (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 a #s(literal 0 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 a #s(literal 0 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 b (*.f64 b b))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64))))) (*.f64 y-scale y-scale)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 b b)) (*.f64 #s(literal 1/4 binary64) (fma.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (/.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 a #s(literal 0 binary64))))) (*.f64 (*.f64 b (*.f64 x-scale x-scale)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))))) |
(* -1 (* b (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))) |
(neg.f64 (*.f64 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))) |
(* -1 (* b (+ (* -1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))) |
(neg.f64 (*.f64 b (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 a #s(literal 0 binary64))))) (*.f64 (*.f64 b (*.f64 x-scale x-scale)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))) |
(* -1 (* b (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/8 (+ (* -1/2 (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (sin (* 1/180 (* angle (PI))))))) b)) (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) b)) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))) |
(neg.f64 (*.f64 b (+.f64 (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (+.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64))))) (*.f64 y-scale y-scale)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) b)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 a #s(literal 0 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) b)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))) |
(* -1 (* b (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (/ (+ (* -1 (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 a) (* 2 a))))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* 4 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (+ (* -2 a) (* 2 a)))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) b)) (+ (* 1/8 (+ (* -1/2 (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (sin (* 1/180 (* angle (PI)))))))) b)) (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) b)) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))) |
(neg.f64 (*.f64 b (+.f64 (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (+.f64 (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 a #s(literal 0 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 a #s(literal 0 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) b) (*.f64 #s(literal 1/8 binary64) (+.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64))))) (*.f64 y-scale y-scale)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) b)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 a #s(literal 0 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) b)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))) |
(+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (pow b 2)) (pow b 2))))) (* a (pow x-scale 2)))) (* 1/4 (* a (* (sqrt 2) (sqrt 8))))) |
(fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 #s(literal 0 binary64) (*.f64 b b)))) (*.f64 a (*.f64 x-scale x-scale))) (*.f64 (*.f64 #s(literal 1/4 binary64) a) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (pow b 2)) (pow b 2))))) (* a (pow x-scale 2)))) (+ (* 1/4 (* a (* (sqrt 2) (sqrt 8)))) (* (pow angle 2) (+ (* 1/8 (+ (* -1/2 (/ (* (pow y-scale 4) (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1 (pow b 2)) (pow b 2)) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))))) (* (pow a 3) (pow x-scale 2)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))))))) (* a (pow x-scale 2))))) (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 2) (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))))) a)))))) |
(fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 #s(literal 0 binary64) (*.f64 b b)))) (*.f64 a (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))) (*.f64 (*.f64 angle angle) (*.f64 #s(literal 1/8 binary64) (+.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 #s(literal 0 binary64) (*.f64 b b))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 a (*.f64 a a)) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale)))) (*.f64 a a)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (*.f64 a a))))))))) (*.f64 a (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))) a)))))) |
(+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (pow b 2)) (pow b 2))))) (* a (pow x-scale 2)))) (+ (* 1/4 (* a (* (sqrt 2) (sqrt 8)))) (* (pow angle 2) (+ (* 1/8 (+ (* -1/2 (/ (* (pow y-scale 4) (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1 (pow b 2)) (pow b 2)) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))))) (* (pow a 3) (pow x-scale 2)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))))))) (* a (pow x-scale 2))))) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 2) (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))))) a)) (* (pow angle 2) (+ (* 1/8 (+ (* -1/2 (/ (* a (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (+ (* 1/4 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (/ (* (pow y-scale 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (pow a 4)))) (+ (* -1 (pow b 2)) (pow b 2)))))) (pow x-scale 2))) (+ (* -1/2 (/ (* (pow y-scale 4) (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2))))))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))))) (* (pow a 3) (pow x-scale 2)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (+ (* (pow b 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 2))))) (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))))) (pow a 2)) (+ (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))) (pow a 2))) (/ (* (pow y-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))) (pow a 2))))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))) (* a (pow x-scale 2)))))) (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 2) (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 2))))))) a))))))))) |
(fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 #s(literal 0 binary64) (*.f64 b b)))) (*.f64 a (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8 binary64) (+.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 #s(literal 0 binary64) (*.f64 b b))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 a (*.f64 a a)) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale)))) (*.f64 a a)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (*.f64 a a))))))))) (*.f64 a (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))) a)) (*.f64 (*.f64 angle angle) (*.f64 #s(literal 1/8 binary64) (+.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 a (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 (+.f64 (neg.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))) (pow.f64 a #s(literal 6 binary64)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))) (pow.f64 a #s(literal 6 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)))) (pow.f64 a #s(literal 4 binary64))))) (*.f64 #s(literal 0 binary64) (*.f64 b b))))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale)))) (*.f64 a a)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (*.f64 a a))))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 a (*.f64 a a)) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 y-scale y-scale)) #s(literal -1/787320000 binary64))))) (*.f64 a a)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)))) (*.f64 a a)) (/.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (+.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale)))) (*.f64 a a)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (*.f64 a a))))) (*.f64 a a)))) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))))))) (*.f64 a (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))) (*.f64 a a)))))) a)))))))) |
(+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (pow b 2)) (pow b 2))))) (* a (pow x-scale 2)))) (+ (* 1/4 (* a (* (sqrt 2) (sqrt 8)))) (* (pow angle 2) (+ (* 1/8 (+ (* -1/2 (/ (* (pow y-scale 4) (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1 (pow b 2)) (pow b 2)) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))))) (* (pow a 3) (pow x-scale 2)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))))))) (* a (pow x-scale 2))))) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 2) (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))))) a)) (* (pow angle 2) (+ (* 1/8 (+ (* -1/2 (/ (* a (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (+ (* 1/4 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (/ (* (pow y-scale 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (pow a 4)))) (+ (* -1 (pow b 2)) (pow b 2)))))) (pow x-scale 2))) (+ (* -1/2 (/ (* (pow y-scale 4) (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2))))))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))))) (* (pow a 3) (pow x-scale 2)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (+ (* (pow b 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 2))))) (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))))) (pow a 2)) (+ (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))) (pow a 2))) (/ (* (pow y-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))) (pow a 2))))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))) (* a (pow x-scale 2)))))) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 2) (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 2))))))) a)) (* (pow angle 2) (+ (* 1/8 (+ (* -1/2 (/ (* a (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1 (/ (* (pow y-scale 2) (* (+ (* -1 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (/ (* (pow y-scale 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (pow a 4))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2))) (+ (* -1 (/ (* (pow y-scale 6) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))) (pow a 6))) (+ (* 1/2 (/ (* (pow y-scale 2) (* (+ (* -1 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (+ (* 1/4 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (/ (* (pow y-scale 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (pow a 4)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2))) (/ (* (pow y-scale 4) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (pow a 4))))) (+ (* -1 (pow b 2)) (pow b 2)))))) (pow x-scale 2))) (+ (* -1/2 (/ (* a (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (+ (* 1/4 (/ (* (pow y-scale 6) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 6))) (/ (* (pow y-scale 4) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (pow a 4)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2))))))))))) (pow x-scale 2))) (+ (* -1/2 (/ (* (pow y-scale 4) (* (sqrt 1/2) (* (sqrt 8) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (+ (* (pow b 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 2))))) (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))))) (pow a 2)) (+ (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))) (pow a 2))) (/ (* (pow y-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))) (pow a 2))))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))))))) (* (pow a 3) (pow x-scale 2)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (+ (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (+ (* (pow b 2) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))))) (pow y-scale 2)))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- b a) 2)))) (pow y-scale 2))) (/ (* (pow (+ a b) 2) (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- b a) 2))) (pow y-scale 2))))))) (pow a 2)) (+ (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))))) (pow a 2))) (+ (/ (* (pow y-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (+ (* (pow b 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 2))))) (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))))) (pow a 2)) (+ (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))) (pow a 2))) (/ (* (pow y-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))) (pow a 2)))))) (pow a 2)) (/ (* (pow y-scale 2) (* (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))) (pow a 2)))))) (+ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6))))))))) (* a (pow x-scale 2))))))) (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 2) (* (sqrt 8) (- (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)) (pow a 2)))))) (pow a 2))))))) a)))))))))))) |
(fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 #s(literal 0 binary64) (*.f64 b b)))) (*.f64 a (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8 binary64) (+.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 #s(literal 0 binary64) (*.f64 b b))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 a (*.f64 a a)) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale)))) (*.f64 a a)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (*.f64 a a))))))))) (*.f64 a (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))) a)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8 binary64) (+.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 a (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 (+.f64 (neg.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))) (pow.f64 a #s(literal 6 binary64)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))) (pow.f64 a #s(literal 6 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)))) (pow.f64 a #s(literal 4 binary64))))) (*.f64 #s(literal 0 binary64) (*.f64 b b))))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale)))) (*.f64 a a)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (*.f64 a a))))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 a (*.f64 a a)) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 y-scale y-scale)) #s(literal -1/787320000 binary64))))) (*.f64 a a)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)))) (*.f64 a a)) (/.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (+.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale)))) (*.f64 a a)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (*.f64 a a))))) (*.f64 a a)))) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))))))) (*.f64 a (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))) (*.f64 a a)))))) a)) (*.f64 (*.f64 angle angle) (*.f64 #s(literal 1/8 binary64) (+.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 a (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (neg.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (+.f64 (neg.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))) (pow.f64 a #s(literal 6 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)))) (pow.f64 a #s(literal 4 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))) (*.f64 a a))) (+.f64 (neg.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))))) (pow.f64 a #s(literal 6 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (+.f64 (neg.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))) (pow.f64 a #s(literal 6 binary64)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))) (pow.f64 a #s(literal 6 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)))) (pow.f64 a #s(literal 4 binary64))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))) (*.f64 a a)) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (*.f64 y-scale y-scale)))) (pow.f64 a #s(literal 4 binary64))))))) (*.f64 #s(literal 0 binary64) (*.f64 b b))))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (neg.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))) (pow.f64 a #s(literal 6 binary64)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))) (pow.f64 a #s(literal 6 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)))) (pow.f64 a #s(literal 4 binary64)))))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale)))) (*.f64 a a)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (*.f64 a a))))))))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 y-scale y-scale)) #s(literal -1/787320000 binary64))))) (*.f64 a a)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)))) (*.f64 a a)) (/.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (+.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale)))) (*.f64 a a)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (*.f64 a a))))) (*.f64 a a)))) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))))))) (*.f64 (*.f64 a (*.f64 a a)) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))) (fma.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)))) (fma.f64 (*.f64 b b) (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 4 binary64) (fma.f64 #s(literal 1/102036672000000 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))))))) (*.f64 a a)) (+.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (*.f64 y-scale y-scale)))) (*.f64 a a)) (/.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 y-scale y-scale)) #s(literal -1/787320000 binary64))))) (*.f64 a a)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)))) (*.f64 a a)) (/.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (+.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale)))) (*.f64 a a)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (*.f64 a a))))) (*.f64 a a))))) (*.f64 a a))) (/.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale)))) (*.f64 a a)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (*.f64 a a))))) (*.f64 a a)))) (fma.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))))))) (*.f64 a (*.f64 x-scale x-scale)))))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (+.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))) (*.f64 a a))))) (*.f64 a a)))))) a)))))))))) |
(+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) |
(+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) |
(+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) |
(+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) |
(+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) |
(+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) |
(+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) |
(+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) |
(+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/4 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 b (*.f64 x-scale x-scale)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (+ (* 1/4 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* a (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))))))) (* (pow b 3) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))))) |
(fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 b (*.f64 x-scale x-scale)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (fma.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (/.f64 (*.f64 (*.f64 a (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64))))) (*.f64 (*.f64 (*.f64 b (*.f64 b b)) (*.f64 x-scale x-scale)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) |
(+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (+ (* 1/4 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* a (+ (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))))) (* (pow b 3) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* a (+ (* 1/8 (+ (* -1/2 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow b 3) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))))) (* 1/8 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))) (* b (sin (* 1/180 (* angle (PI))))))))))))) |
(fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 b (*.f64 x-scale x-scale)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 a (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64))))) (*.f64 (*.f64 (*.f64 b (*.f64 b b)) (*.f64 x-scale x-scale)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 a (*.f64 #s(literal 1/8 binary64) (+.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 (*.f64 b (*.f64 b b)) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (*.f64 b (*.f64 x-scale x-scale)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 b (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))))) |
(+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (+ (* 1/4 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* a (+ (* 1/4 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))))) (* (pow b 3) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* a (+ (* 1/8 (* a (+ (* -1 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))))) (* (pow b 5) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (pow b 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))))))) (+ (* 1/8 (+ (* -1/2 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow b 3) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* b (* (pow x-scale 2) (sin (* 1/180 (* angle (PI))))))))) (* 1/8 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8))) (* b (sin (* 1/180 (* angle (PI)))))))))))))) |
(fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 b (*.f64 x-scale x-scale)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 a (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64))))) (*.f64 (*.f64 (*.f64 b (*.f64 b b)) (*.f64 x-scale x-scale)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 a (fma.f64 #s(literal 1/8 binary64) (*.f64 a (+.f64 (neg.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64))))) (*.f64 (*.f64 (pow.f64 b #s(literal 5 binary64)) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b #s(literal 0 binary64))) (*.f64 b b)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (*.f64 (*.f64 b (*.f64 x-scale x-scale)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/8 binary64) (+.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 (*.f64 b (*.f64 b b)) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (*.f64 b (*.f64 x-scale x-scale)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 b (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))))) |
(* a (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) |
(*.f64 a (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))) |
(* a (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (+ (* 1/4 (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))))))) |
(*.f64 a (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (fma.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 b #s(literal 0 binary64))))) (*.f64 (*.f64 a (*.f64 x-scale x-scale)) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) |
(* a (+ (* 1/8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (* (pow a 2) (cos (* 1/180 (* angle (PI))))))) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (+ (* 1/8 (/ (+ (* -1/2 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/4 (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))))))))) |
(*.f64 a (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 a a) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64))))) (*.f64 y-scale y-scale)))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 a a)) (*.f64 #s(literal 1/4 binary64) (fma.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 b #s(literal 0 binary64))))) (*.f64 (*.f64 a (*.f64 x-scale x-scale)) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) |
(* a (+ (* 1/8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (* (pow a 2) (cos (* 1/180 (* angle (PI))))))) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (+ (* 1/8 (/ (+ (* -1 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 b) (* 2 b))))))) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* 4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (+ (* -2 b) (* 2 b)))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (pow a 3))) (+ (* 1/8 (/ (+ (* -1/2 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/4 (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))))))))) |
(*.f64 a (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 a a) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (+.f64 (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 b b) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 b #s(literal 0 binary64))))) (*.f64 (*.f64 x-scale x-scale) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 b #s(literal 0 binary64)))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 x-scale x-scale) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 a (*.f64 a a))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64))))) (*.f64 y-scale y-scale)))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 a a)) (*.f64 #s(literal 1/4 binary64) (fma.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 b #s(literal 0 binary64))))) (*.f64 (*.f64 a (*.f64 x-scale x-scale)) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))))) |
(* -1 (* a (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))) |
(neg.f64 (*.f64 a (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))) |
(* -1 (* a (+ (* -1/4 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))))) (* a (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))) |
(neg.f64 (*.f64 a (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 b #s(literal 0 binary64))))) (*.f64 (*.f64 a (*.f64 x-scale x-scale)) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))) |
(* -1 (* a (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/8 (+ (* -1/2 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (* 1/8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (cos (* 1/180 (* angle (PI))))))) a)) (* 1/4 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) a)) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))) |
(neg.f64 (*.f64 a (+.f64 (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (+.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64))))) (*.f64 y-scale y-scale)))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) a)) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 b #s(literal 0 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) a)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))) |
(* -1 (* a (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (/ (+ (* -1 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 b) (* 2 b))))))) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* 4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (+ (* -2 b) (* 2 b)))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) a)) (+ (* 1/8 (+ (* -1/2 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 3)))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) (* 1/8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 2) (sqrt 8)))) (cos (* 1/180 (* angle (PI)))))))) a)) (* 1/4 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI)))))))) a)) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (cos (* 1/180 (* angle (PI))))))) (* 1/4 (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))) |
(neg.f64 (*.f64 a (+.f64 (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (+.f64 (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 b b) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 b #s(literal 0 binary64))))) (*.f64 (*.f64 x-scale x-scale) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 b #s(literal 0 binary64)))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 x-scale x-scale) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) a) (*.f64 #s(literal 1/8 binary64) (+.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64))))) (*.f64 y-scale y-scale)))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) a)) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 b #s(literal 0 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) a)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))) |
(* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 x-scale x-scale))) |
(/ (+ (* 1/8 (* (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* (pow x-scale 2) (* y-scale (* (sqrt 2) (sqrt 8)))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow x-scale 2)) |
(/.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 y-scale (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (*.f64 x-scale x-scale)) |
(/ (+ (* 1/8 (* (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* (pow x-scale 2) (* y-scale (* (sqrt 2) (sqrt 8)))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow x-scale 2)) |
(/.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 y-scale (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (*.f64 x-scale x-scale)) |
(/ (+ (* 1/8 (* (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* (pow x-scale 2) (* y-scale (* (sqrt 2) (sqrt 8)))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow x-scale 2)) |
(/.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 y-scale (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (*.f64 x-scale x-scale)) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) |
(+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) |
(+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) |
(+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) |
(* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) |
(+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) |
(+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) |
(+ (* 1/8 (* (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (sqrt (/ 1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 1/4 (* (* y-scale (* (sqrt 2) (sqrt 8))) (sqrt (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) |
(* 2 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) |
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) |
(* 2 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) |
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) |
(* 2 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) |
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) |
(* 2 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) |
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) |
(* 2 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) |
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) |
(* 2 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) |
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) |
(* 2 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) |
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) |
(* 2 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) |
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) |
(* 2 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) |
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) |
(* 2 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) |
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) |
(* 2 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) |
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) |
(* 2 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) |
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) |
2 |
#s(literal 2 binary64) |
(+ 2 (* -1/16200 (* (pow angle 2) (pow (PI) 2)))) |
(+.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal -1/16200 binary64) (*.f64 angle angle)) (*.f64 (PI.f64) (PI.f64)))) |
(+ 2 (* (pow angle 2) (+ (* -1/16200 (pow (PI) 2)) (* 1/1574640000 (* (pow angle 2) (pow (PI) 4)))))) |
(+.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/16200 binary64) (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 #s(literal 1/1574640000 binary64) (*.f64 angle angle)) (pow.f64 (PI.f64) #s(literal 4 binary64)))))) |
(+ 2 (* (pow angle 2) (+ (* -1/16200 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/382637520000000 (* (pow angle 2) (pow (PI) 6))) (* 1/1574640000 (pow (PI) 4))))))) |
(+.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/16200 binary64) (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 angle angle) (fma.f64 (*.f64 #s(literal -1/382637520000000 binary64) (*.f64 angle angle)) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal 1/1574640000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) |
(* 2 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) |
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) |
(* 2 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) |
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) |
(* 2 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) |
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) |
(* 2 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) |
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) |
(* 2 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) |
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) |
(* 2 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) |
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) |
(* 2 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) |
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) |
(* 2 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) |
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) |
(+ (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) |
(fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (*.f64 (*.f64 b b) x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 b b) (*.f64 #s(literal 1/8 binary64) (fma.f64 x-scale (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 (*.f64 (*.f64 b b) x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/8 binary64) (*.f64 x-scale (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) (*.f64 (*.f64 b b) (*.f64 #s(literal 1/8 binary64) (fma.f64 x-scale (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 (*.f64 (*.f64 b b) x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (*.f64 (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))))))) |
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) |
(* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))) |
(*.f64 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (*.f64 b b)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))))) |
(* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) |
(*.f64 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (*.f64 b b)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (pow.f64 b #s(literal 4 binary64))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))))) |
(* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))))) |
(*.f64 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (*.f64 b b)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (*.f64 (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (pow.f64 b #s(literal 6 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (pow.f64 b #s(literal 4 binary64))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))))))) |
(* -1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) |
(*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 b x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) |
(* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) |
(neg.f64 (*.f64 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (*.f64 b b)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))))) |
(* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))))) |
(neg.f64 (*.f64 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (*.f64 b b)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (pow.f64 b #s(literal 4 binary64))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))))))) |
(* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (pow b 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))))) |
(neg.f64 (*.f64 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (*.f64 b b)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (*.f64 (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (pow.f64 b #s(literal 6 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (pow.f64 b #s(literal 4 binary64))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) |
(+ (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) |
(fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (*.f64 (*.f64 a a) x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 a a) (*.f64 #s(literal 1/8 binary64) (fma.f64 x-scale (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 (*.f64 (*.f64 a a) x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/8 binary64) (*.f64 x-scale (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) (*.f64 (*.f64 a a) (*.f64 #s(literal 1/8 binary64) (fma.f64 x-scale (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 (*.f64 (*.f64 a a) x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (*.f64 (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))))))) |
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) |
(* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) |
(*.f64 a (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (*.f64 a a)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))))) |
(* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) |
(*.f64 a (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (*.f64 a a)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (pow.f64 a #s(literal 4 binary64))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))))) |
(* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))) |
(*.f64 a (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (*.f64 a a)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (*.f64 (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (pow.f64 a #s(literal 6 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (pow.f64 a #s(literal 4 binary64))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))))))) |
(* -1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) |
(*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 a x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) |
(* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) |
(neg.f64 (*.f64 a (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (*.f64 a a)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))))) |
(* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))) |
(neg.f64 (*.f64 a (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (*.f64 a a)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (pow.f64 a #s(literal 4 binary64))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))))))) |
(* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/4 (* (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* 1/2 (/ (* (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 6)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* 1/4 (/ (pow (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))))) |
(neg.f64 (*.f64 a (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (*.f64 a a)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (*.f64 (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (pow.f64 a #s(literal 6 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (pow.f64 a #s(literal 4 binary64))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))))))) |
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) |
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) |
(+ (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) |
(fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) |
(+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 #s(literal 1/8 binary64) (fma.f64 y-scale (*.f64 (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))))))) |
(+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* (pow x-scale 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 #s(literal 1/8 binary64) (fma.f64 y-scale (*.f64 (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) |
(*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))) |
(* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) |
(*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (pow.f64 x-scale #s(literal 6 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))))) |
(* -1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) |
(*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) |
(* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) |
(neg.f64 (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))) |
(* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) |
(neg.f64 (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))))) |
(* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))))) |
(neg.f64 (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (pow.f64 x-scale #s(literal 6 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))))) |
(* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) |
(+ (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) |
(fma.f64 #s(literal 1/8 binary64) (*.f64 x-scale (*.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) |
(+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 (*.f64 y-scale y-scale) (*.f64 #s(literal 1/8 binary64) (fma.f64 x-scale (*.f64 (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 x-scale (*.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))))))) |
(+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 y-scale y-scale) (*.f64 #s(literal 1/8 binary64) (fma.f64 x-scale (*.f64 (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 x-scale (*.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) |
(* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) |
(*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 y-scale y-scale)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) |
(* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) |
(*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))) |
(* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) |
(*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)))))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (pow.f64 y-scale #s(literal 6 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))))) |
(* -1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) |
(* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) |
(neg.f64 (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 y-scale y-scale)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))) |
(* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) |
(neg.f64 (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))))) |
(* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3))) (* 1/2 (/ (* (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))))) |
(neg.f64 (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)))))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (pow.f64 y-scale #s(literal 6 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))))) |
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) |
(+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))))))) (* b (sqrt 2)))) (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))) |
(fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 angle angle) (*.f64 x-scale x-scale)) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))))) (*.f64 b (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))) |
(+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))))) (* b (sqrt 2))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (*.f64 angle angle) (*.f64 #s(literal 1/8 binary64) (+.f64 (/.f64 (*.f64 (*.f64 (*.f64 angle angle) (*.f64 x-scale x-scale)) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal -1/787320000 binary64)) (pow.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))))) (*.f64 b (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))))) (*.f64 b (sqrt.f64 #s(literal 2 binary64)))))))) |
(+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))))) (* b (sqrt 2)))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))))) (* 1/2 (/ (* (pow x-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2)))))))) (* b (sqrt 2))))))))) |
(fma.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))))) (*.f64 b (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 angle angle) (*.f64 #s(literal 1/8 binary64) (+.f64 (/.f64 (*.f64 (*.f64 (*.f64 angle angle) (*.f64 x-scale x-scale)) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))))) (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (fma.f64 #s(literal 1/102036672000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (+.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal -1/787320000 binary64)) (pow.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))) (*.f64 y-scale y-scale)) (+.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))))) (+.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal -1/787320000 binary64)) (pow.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))))) (*.f64 (*.f64 b b) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))))) (*.f64 b (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal -1/787320000 binary64)) (pow.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (pow.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))))) (*.f64 b (sqrt.f64 #s(literal 2 binary64)))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) |
1 |
#s(literal 1 binary64) |
(+ 1 (* -1/16200 (* (pow angle 2) (pow (PI) 2)))) |
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/16200 binary64) (*.f64 angle angle)) (*.f64 (PI.f64) (PI.f64)))) |
(+ 1 (* (pow angle 2) (+ (* -1/16200 (pow (PI) 2)) (* 1/1574640000 (* (pow angle 2) (pow (PI) 4)))))) |
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/16200 binary64) (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 #s(literal 1/1574640000 binary64) (*.f64 angle angle)) (pow.f64 (PI.f64) #s(literal 4 binary64)))))) |
(+ 1 (* (pow angle 2) (+ (* -1/16200 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/382637520000000 (* (pow angle 2) (pow (PI) 6))) (* 1/1574640000 (pow (PI) 4))))))) |
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/16200 binary64) (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 angle angle) (fma.f64 (*.f64 #s(literal -1/382637520000000 binary64) (*.f64 angle angle)) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal 1/1574640000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) |
(cos (* 1/90 (* angle (PI)))) |
(cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) |
(cos (* 1/90 (* angle (PI)))) |
(cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) |
(cos (* 1/90 (* angle (PI)))) |
(cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) |
(cos (* 1/90 (* angle (PI)))) |
(cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) |
(cos (* 1/90 (* angle (PI)))) |
(cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) |
(cos (* 1/90 (* angle (PI)))) |
(cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) |
(cos (* 1/90 (* angle (PI)))) |
(cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) |
(cos (* 1/90 (* angle (PI)))) |
(cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) |
| 1× | batch-egg-rewrite |
| 4 722× | lower-*.f32 |
| 4 650× | lower-*.f64 |
| 4 136× | lower-/.f32 |
| 4 126× | lower-/.f64 |
| 1 862× | lower-fma.f32 |
Useful iterations: 0 (0.0ms)
| Iter | Nodes | Cost |
|---|---|---|
| 0 | 229 | 2382 |
| 0 | 305 | 2180 |
| 1 | 1483 | 2002 |
| 0 | 8766 | 1942 |
| 1× | iter limit |
| 1× | node limit |
| 1× | iter limit |
| Inputs |
|---|
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 #s(approx (pow (cos (* 1/180 (* angle (PI)))) 2) #s(literal 1 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 #s(approx (pow (cos (* 1/180 (* angle (PI)))) 2) #s(literal 1 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) |
(*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* y-scale 4) (* b 1/4)) (*.f64 b y-scale))) |
#s(approx (* (* y-scale 4) (* b 1/4)) (*.f64 b y-scale)) |
(*.f64 b y-scale) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))) |
#s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) |
(*.f64 (*.f64 a y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) |
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) |
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) |
#s(approx (* (/ -1 (* (neg (* a b)) (* 4 (* a b)))) (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 4 binary64) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) |
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) |
(fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) |
(*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
(sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 #s(approx (pow (cos (* 1/180 (* angle (PI)))) 2) #s(literal 1 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a))))) |
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
#s(approx (pow (cos (* 1/180 (* angle (PI)))) 2) #s(literal 1 binary64)) |
(cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) |
(sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))) |
#s(approx (+ (* 1/8 (/ (* (* (* y-scale (sqrt 8)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (/ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (* (+ b a) (- b a)) (* (+ b a) (- b a)))))) (* y-scale y-scale))) (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (sqrt (/ 1 (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (* x-scale x-scale))) (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (*.f64 (neg.f64 b) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 4 binary64) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) |
(*.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(approx (+ (* 1/8 (/ (* (* (* y-scale (sqrt 8)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (/ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (* (+ b a) (- b a)) (* (+ b a) (- b a)))))) (* y-scale y-scale))) (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (sqrt (/ 1 (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (* x-scale x-scale))) (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (*.f64 (neg.f64 b) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 4 binary64) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) x-scale)) |
(cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) |
| Outputs |
|---|
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 #s(approx (pow (cos (* 1/180 (* angle (PI)))) 2) #s(literal 1 binary64)) (*.f64 b b))))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 #s(approx (pow (cos (* 1/180 (* angle (PI)))) 2) #s(literal 1 binary64)) (*.f64 b b))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 #s(approx (pow (cos (* 1/180 (* angle (PI)))) 2) #s(literal 1 binary64)) (*.f64 b b)))))) |
(*.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 #s(approx (pow (cos (* 1/180 (* angle (PI)))) 2) #s(literal 1 binary64)) (*.f64 b b))))) (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) |
(*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) #s(literal 1/4 binary64)) |
(*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (sqrt.f64 #s(literal 8 binary64))) |
(*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) |
(*.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* y-scale 4) (* b 1/4)) (*.f64 b y-scale))) |
#s(approx (* (* y-scale 4) (* b 1/4)) (*.f64 b y-scale)) |
(*.f64 b y-scale) |
(*.f64 y-scale b) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 a y-scale)) (*.f64 #s(literal 4 binary64) (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) |
#s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 a y-scale)) (*.f64 #s(literal 4 binary64) (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a y-scale) (*.f64 #s(literal 4 binary64) (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) |
(*.f64 (*.f64 (*.f64 a y-scale) (*.f64 #s(literal 4 binary64) (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))) #s(literal 1/4 binary64)) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 a y-scale)) (*.f64 #s(literal 4 binary64) (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))) |
(*.f64 a (*.f64 y-scale (*.f64 #s(literal 4 binary64) (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) |
(*.f64 (*.f64 a y-scale) (*.f64 #s(literal 4 binary64) (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))) |
(*.f64 (*.f64 #s(literal 4 binary64) (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) (*.f64 a y-scale)) |
(*.f64 (*.f64 (*.f64 a y-scale) (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) #s(literal 4 binary64)) |
(+.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 y-scale y-scale))) |
(+.f64 (/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) |
(-.f64 (/.f64 (/.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) #s(literal 4 binary64)) (*.f64 (*.f64 y-scale y-scale) (*.f64 y-scale y-scale))) (/.f64 (-.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) #s(literal 4 binary64)) (*.f64 (*.f64 y-scale y-scale) (*.f64 y-scale y-scale))) (/.f64 (-.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale)))) |
(-.f64 (/.f64 (/.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) #s(literal 4 binary64)) (*.f64 (*.f64 y-scale y-scale) (*.f64 y-scale y-scale))) (/.f64 (-.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) #s(literal 4 binary64)) (*.f64 (*.f64 y-scale y-scale) (*.f64 y-scale y-scale))) (/.f64 (-.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale)))) |
(fma.f64 b (*.f64 b (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) |
(fma.f64 #s(literal 1 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 y-scale y-scale))) |
(fma.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) |
(fma.f64 (*.f64 b b) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) |
(fma.f64 (*.f64 a a) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 y-scale y-scale))) |
(fma.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 y-scale y-scale))) |
(fma.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) |
(fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 y-scale y-scale))) |
(fma.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 b b) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) |
(fma.f64 (neg.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 y-scale y-scale))) |
(fma.f64 (neg.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 y-scale y-scale))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) |
(fma.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) y-scale) (/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 y-scale y-scale))) |
(fma.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) y-scale) (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 y-scale y-scale))) |
(fma.f64 (/.f64 (*.f64 b b) y-scale) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) y-scale) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) |
(fma.f64 (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) y-scale) (/.f64 #s(literal 1 binary64) y-scale) (/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 y-scale y-scale))) |
(fma.f64 (/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) y-scale) (/.f64 #s(literal 1 binary64) y-scale) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) |
(fma.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) y-scale) (/.f64 (*.f64 b b) y-scale) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) |
(fma.f64 (/.f64 b y-scale) (/.f64 (*.f64 b (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) y-scale) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) |
(fma.f64 (/.f64 a y-scale) (/.f64 (*.f64 a (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) y-scale) (/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 y-scale y-scale))) |
(fma.f64 (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) a) y-scale) (/.f64 a y-scale) (/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 y-scale y-scale))) |
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 y-scale y-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))) |
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (/.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) #s(literal 4 binary64)) (*.f64 (*.f64 y-scale y-scale) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) #s(literal 4 binary64)) (*.f64 (*.f64 y-scale y-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 y-scale y-scale) (*.f64 y-scale y-scale))))) (+.f64 (pow.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 y-scale y-scale)) #s(literal 3 binary64))))) |
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (-.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale)) (-.f64 (/.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) #s(literal 4 binary64)) (*.f64 (*.f64 y-scale y-scale) (*.f64 y-scale y-scale))) (/.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) #s(literal 4 binary64)) (*.f64 (*.f64 y-scale y-scale) (*.f64 y-scale y-scale)))))) |
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (/.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) #s(literal 4 binary64)) (*.f64 (*.f64 y-scale y-scale) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) #s(literal 4 binary64)) (*.f64 (*.f64 y-scale y-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 y-scale y-scale) (*.f64 y-scale y-scale))))) (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 y-scale y-scale)) #s(literal 3 binary64)) (pow.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) #s(literal 3 binary64))))) |
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (-.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale)) (-.f64 (/.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) #s(literal 4 binary64)) (*.f64 (*.f64 y-scale y-scale) (*.f64 y-scale y-scale))) (/.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) #s(literal 4 binary64)) (*.f64 (*.f64 y-scale y-scale) (*.f64 y-scale y-scale)))))) |
(/.f64 (fma.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 y-scale y-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 (*.f64 y-scale y-scale) (*.f64 y-scale y-scale))) |
(/.f64 (+.f64 (pow.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 y-scale y-scale)) #s(literal 3 binary64))) (+.f64 (/.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) #s(literal 4 binary64)) (*.f64 (*.f64 y-scale y-scale) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) #s(literal 4 binary64)) (*.f64 (*.f64 y-scale y-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 y-scale y-scale) (*.f64 y-scale y-scale)))))) |
(/.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 y-scale y-scale)) #s(literal 3 binary64)) (pow.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) #s(literal 3 binary64))) (+.f64 (/.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) #s(literal 4 binary64)) (*.f64 (*.f64 y-scale y-scale) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) #s(literal 4 binary64)) (*.f64 (*.f64 y-scale y-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 y-scale y-scale) (*.f64 y-scale y-scale)))))) |
(/.f64 (-.f64 (/.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) #s(literal 4 binary64)) (*.f64 (*.f64 y-scale y-scale) (*.f64 y-scale y-scale))) (/.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) #s(literal 4 binary64)) (*.f64 (*.f64 y-scale y-scale) (*.f64 y-scale y-scale)))) (/.f64 (-.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale))) |
(/.f64 (-.f64 (/.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) #s(literal 4 binary64)) (*.f64 (*.f64 y-scale y-scale) (*.f64 y-scale y-scale))) (/.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) #s(literal 4 binary64)) (*.f64 (*.f64 y-scale y-scale) (*.f64 y-scale y-scale)))) (/.f64 (-.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale))) |
(/.f64 (fma.f64 #s(literal 1 binary64) (/.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 (/.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) #s(literal 1 binary64))) (*.f64 (/.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (/.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) |
(/.f64 (fma.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 (/.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale))) |
(/.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 (*.f64 y-scale y-scale)) (*.f64 (/.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (neg.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 (/.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (neg.f64 (*.f64 y-scale y-scale)))) |
(/.f64 (fma.f64 #s(literal 1 binary64) y-scale (*.f64 (/.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) y-scale))) (*.f64 (/.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) y-scale)) |
(/.f64 (fma.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (/.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 y-scale y-scale) #s(literal 1 binary64))) (*.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) |
(/.f64 (fma.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (neg.f64 (*.f64 y-scale y-scale)) (*.f64 (*.f64 y-scale y-scale) (neg.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 (*.f64 y-scale y-scale) (neg.f64 (*.f64 y-scale y-scale)))) |
(/.f64 (fma.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) y-scale (*.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) y-scale))) (*.f64 (*.f64 y-scale y-scale) y-scale)) |
(/.f64 (fma.f64 (neg.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (/.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 (neg.f64 (*.f64 y-scale y-scale)) #s(literal 1 binary64))) (*.f64 (neg.f64 (*.f64 y-scale y-scale)) (/.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) |
(/.f64 (fma.f64 (neg.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale) (*.f64 (neg.f64 (*.f64 y-scale y-scale)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 (neg.f64 (*.f64 y-scale y-scale)) (*.f64 y-scale y-scale))) |
(/.f64 (fma.f64 (neg.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (neg.f64 (*.f64 y-scale y-scale)) (*.f64 (neg.f64 (*.f64 y-scale y-scale)) (neg.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 (neg.f64 (*.f64 y-scale y-scale)) (neg.f64 (*.f64 y-scale y-scale)))) |
(/.f64 (fma.f64 (neg.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) y-scale (*.f64 (neg.f64 (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) y-scale))) (*.f64 (neg.f64 (*.f64 y-scale y-scale)) y-scale)) |
(/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) y-scale) (/.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale #s(literal 1 binary64))) (*.f64 y-scale (/.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) |
(/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) y-scale) (*.f64 y-scale y-scale) (*.f64 y-scale (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 y-scale (*.f64 y-scale y-scale))) |
(/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) y-scale) (neg.f64 (*.f64 y-scale y-scale)) (*.f64 y-scale (neg.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 y-scale (neg.f64 (*.f64 y-scale y-scale)))) |
(/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) y-scale) y-scale (*.f64 y-scale (/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) y-scale))) (*.f64 y-scale y-scale)) |
(/.f64 (fma.f64 #s(literal 1 binary64) (/.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 (/.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) #s(literal 1 binary64))) (*.f64 (/.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (/.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) |
(/.f64 (fma.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 (/.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale))) |
(/.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 (*.f64 y-scale y-scale)) (*.f64 (/.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (neg.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 (/.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (neg.f64 (*.f64 y-scale y-scale)))) |
(/.f64 (fma.f64 #s(literal 1 binary64) y-scale (*.f64 (/.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) y-scale))) (*.f64 (/.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) y-scale)) |
(/.f64 (fma.f64 (neg.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (/.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 (neg.f64 (*.f64 y-scale y-scale)) #s(literal 1 binary64))) (*.f64 (neg.f64 (*.f64 y-scale y-scale)) (/.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) |
(/.f64 (fma.f64 (neg.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale) (*.f64 (neg.f64 (*.f64 y-scale y-scale)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 (neg.f64 (*.f64 y-scale y-scale)) (*.f64 y-scale y-scale))) |
(/.f64 (fma.f64 (neg.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (neg.f64 (*.f64 y-scale y-scale)) (*.f64 (neg.f64 (*.f64 y-scale y-scale)) (neg.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 (neg.f64 (*.f64 y-scale y-scale)) (neg.f64 (*.f64 y-scale y-scale)))) |
(/.f64 (fma.f64 (neg.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) y-scale (*.f64 (neg.f64 (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) y-scale))) (*.f64 (neg.f64 (*.f64 y-scale y-scale)) y-scale)) |
(/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) y-scale) (/.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale #s(literal 1 binary64))) (*.f64 y-scale (/.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) |
(/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) y-scale) (*.f64 y-scale y-scale) (*.f64 y-scale (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 y-scale (*.f64 y-scale y-scale))) |
(/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) y-scale) (neg.f64 (*.f64 y-scale y-scale)) (*.f64 y-scale (neg.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 y-scale (neg.f64 (*.f64 y-scale y-scale)))) |
(/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) y-scale) y-scale (*.f64 y-scale (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) y-scale))) (*.f64 y-scale y-scale)) |
(/.f64 (fma.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (/.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 y-scale y-scale) #s(literal 1 binary64))) (*.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) |
(/.f64 (fma.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 y-scale y-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 (*.f64 y-scale y-scale) (*.f64 y-scale y-scale))) |
(/.f64 (fma.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (neg.f64 (*.f64 y-scale y-scale)) (*.f64 (*.f64 y-scale y-scale) (neg.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (*.f64 (*.f64 y-scale y-scale) (neg.f64 (*.f64 y-scale y-scale)))) |
(/.f64 (fma.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) y-scale (*.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) y-scale))) (*.f64 (*.f64 y-scale y-scale) y-scale)) |
(/.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 y-scale y-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (neg.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 y-scale y-scale)))) |
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 y-scale y-scale)) #s(literal 3 binary64)))) (neg.f64 (+.f64 (/.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) #s(literal 4 binary64)) (*.f64 (*.f64 y-scale y-scale) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) #s(literal 4 binary64)) (*.f64 (*.f64 y-scale y-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 y-scale y-scale) (*.f64 y-scale y-scale))))))) |
(/.f64 (neg.f64 (-.f64 (/.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) #s(literal 4 binary64)) (*.f64 (*.f64 y-scale y-scale) (*.f64 y-scale y-scale))) (/.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) #s(literal 4 binary64)) (*.f64 (*.f64 y-scale y-scale) (*.f64 y-scale y-scale))))) (neg.f64 (/.f64 (-.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale)))) |
(/.f64 (neg.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 y-scale y-scale)) #s(literal 3 binary64)) (pow.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (/.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) #s(literal 4 binary64)) (*.f64 (*.f64 y-scale y-scale) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) #s(literal 4 binary64)) (*.f64 (*.f64 y-scale y-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 y-scale y-scale) (*.f64 y-scale y-scale))))))) |
(/.f64 (neg.f64 (-.f64 (/.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) #s(literal 4 binary64)) (*.f64 (*.f64 y-scale y-scale) (*.f64 y-scale y-scale))) (/.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) #s(literal 4 binary64)) (*.f64 (*.f64 y-scale y-scale) (*.f64 y-scale y-scale))))) (neg.f64 (/.f64 (-.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale)))) |
(*.f64 (fma.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 y-scale y-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 y-scale y-scale) (*.f64 y-scale y-scale)))) |
(*.f64 (+.f64 (pow.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 y-scale y-scale)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) #s(literal 4 binary64)) (*.f64 (*.f64 y-scale y-scale) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) #s(literal 4 binary64)) (*.f64 (*.f64 y-scale y-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 y-scale y-scale) (*.f64 y-scale y-scale))))))) |
(*.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 y-scale y-scale)) #s(literal 3 binary64)) (pow.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) #s(literal 4 binary64)) (*.f64 (*.f64 y-scale y-scale) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) #s(literal 4 binary64)) (*.f64 (*.f64 y-scale y-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 y-scale y-scale) (*.f64 y-scale y-scale))))))) |
(*.f64 (-.f64 (/.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) #s(literal 4 binary64)) (*.f64 (*.f64 y-scale y-scale) (*.f64 y-scale y-scale))) (/.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) #s(literal 4 binary64)) (*.f64 (*.f64 y-scale y-scale) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale)))) |
(*.f64 (-.f64 (/.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) #s(literal 4 binary64)) (*.f64 (*.f64 y-scale y-scale) (*.f64 y-scale y-scale))) (/.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) #s(literal 4 binary64)) (*.f64 (*.f64 y-scale y-scale) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale)))) |
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) |
(+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) |
(exp.f64 (*.f64 (log.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) #s(literal 2 binary64))) |
(-.f64 (/.f64 #s(literal 1/4 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (/.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) |
(-.f64 (/.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (/.f64 #s(literal 1/4 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) |
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) |
(fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) |
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1/4 binary64) (-.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 3 binary64))))) |
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 3 binary64)) #s(literal 1/8 binary64)))) |
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 2 binary64))))) |
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (+.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 2 binary64)) #s(literal -1/4 binary64)))) |
(/.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 3 binary64))) (+.f64 #s(literal 1/4 binary64) (-.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))) |
(/.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (+.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))))) |
(/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) |
(/.f64 (+.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 2 binary64)) #s(literal -1/4 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) |
(/.f64 (+.f64 (cos.f64 (fma.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) (cos.f64 (-.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))) #s(literal 2 binary64)) |
(/.f64 (neg.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 3 binary64)))) (neg.f64 (+.f64 #s(literal 1/4 binary64) (-.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))))) |
(/.f64 (neg.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (neg.f64 (+.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)))))) |
(/.f64 (neg.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 2 binary64)))) (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) |
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 2 binary64)) #s(literal -1/4 binary64))) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) |
(pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) |
(pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 1 binary64)) |
(pow.f64 (exp.f64 (log.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))) #s(literal 2 binary64)) |
(*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) |
(*.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/4 binary64) (-.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))))) |
(*.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)))))) |
(*.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) |
(*.f64 (+.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 2 binary64)) #s(literal -1/4 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) |
(*.f64 (exp.f64 (log.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))) (exp.f64 (log.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) |
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) |
(+.f64 #s(literal 1/2 binary64) (neg.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) |
(+.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) |
(exp.f64 (*.f64 (log.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) #s(literal 2 binary64))) |
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) |
(-.f64 (/.f64 #s(literal 1/8 binary64) (+.f64 #s(literal 1/4 binary64) (+.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))) (/.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 3 binary64)) (+.f64 #s(literal 1/4 binary64) (+.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))))) |
(-.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (/.f64 (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) |
(-.f64 (/.f64 #s(literal 1/4 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (/.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) |
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) |
(fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) |
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1/4 binary64) (-.f64 (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 3 binary64))))) |
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1/4 binary64) (+.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (-.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 3 binary64))))) |
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (-.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 2 binary64))))) |
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 2 binary64))))) |
(/.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 3 binary64))) (+.f64 #s(literal 1/4 binary64) (-.f64 (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))) |
(/.f64 (-.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 3 binary64))) (+.f64 #s(literal 1/4 binary64) (+.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))) |
(/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) |
(/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) |
(/.f64 (-.f64 (cos.f64 (-.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) (cos.f64 (fma.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))) #s(literal 2 binary64)) |
(/.f64 (neg.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 2 binary64)))) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) |
(/.f64 (neg.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 3 binary64)))) (neg.f64 (+.f64 #s(literal 1/4 binary64) (-.f64 (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))))) |
(/.f64 (neg.f64 (-.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 3 binary64)))) (neg.f64 (+.f64 #s(literal 1/4 binary64) (+.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))))) |
(/.f64 (neg.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 2 binary64)))) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) |
(/.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 3 binary64))) (+.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (neg.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 #s(literal 1/2 binary64) (neg.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))))) |
(/.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (+.f64 (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))))) |
(/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (neg.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (-.f64 #s(literal 1/2 binary64) (neg.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) |
(/.f64 (-.f64 (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 2 binary64)) #s(literal 1/4 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) |
(pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) |
(pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 1 binary64)) |
(pow.f64 (exp.f64 (log.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))) #s(literal 2 binary64)) |
(*.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) |
(*.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/4 binary64) (-.f64 (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))))) |
(*.f64 (-.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/4 binary64) (+.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))))) |
(*.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) |
(*.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) |
(*.f64 (exp.f64 (log.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))) (exp.f64 (log.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) |
#s(approx (* (/ -1 (* (neg (* a b)) (* 4 (* a b)))) (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) |
(exp.f64 (*.f64 (log.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) #s(literal 1 binary64))) |
(sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) |
(pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 1 binary64)) |
(*.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 4 binary64) (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))) |
(*.f64 #s(literal 1 binary64) (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) |
(*.f64 (*.f64 #s(literal 4 binary64) (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) #s(literal 1/4 binary64)) |
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)))))) |
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1 binary64))) |
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale))))))) |
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) |
(/.f64 (neg.f64 (*.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale))))) (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) |
(/.f64 (neg.f64 (neg.f64 (*.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)))))) (neg.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) |
(pow.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale))))) #s(literal -1 binary64)) |
(*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) |
(*.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) |
(*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) |
(*.f64 (neg.f64 (*.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale))))) (/.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) |
(+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) |
(+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) |
(+.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 1/2 binary64)) |
(-.f64 (/.f64 (pow.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) |
(fma.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) |
(fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 y-scale y-scale) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) |
(fma.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) |
(fma.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/4 binary64) (-.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) |
(fma.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))))) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) |
(fma.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) |
(fma.f64 (+.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 2 binary64)) #s(literal -1/4 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) |
(fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) |
(fma.f64 (exp.f64 (log.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))) (exp.f64 (log.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) |
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (-.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) #s(literal 3 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64))))) |
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (-.f64 (pow.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64))))) |
(/.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) #s(literal 3 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (-.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) |
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) |
(/.f64 (neg.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) #s(literal 3 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (-.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))) |
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)))) (neg.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) |
(/.f64 (+.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) #s(literal 3 binary64))) (+.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))))) |
(/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (-.f64 #s(literal 1/4 binary64) (*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 1/2 binary64))))) |
(/.f64 (-.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) #s(literal 2 binary64))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))) |
(/.f64 (-.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) #s(literal 1/4 binary64)) (-.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 1/2 binary64))) |
(*.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) #s(literal 3 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (-.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))) |
(*.f64 (-.f64 (pow.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) |
(*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) |
(*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)) |
(*.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))) #s(literal 2 binary64)) |
(*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))) |
(*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64)) |
(*.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (PI.f64))) #s(literal 1/180 binary64)) |
(exp.f64 (*.f64 (log.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 #s(approx (pow (cos (* 1/180 (* angle (PI)))) 2) #s(literal 1 binary64)) (*.f64 b b))))) #s(literal 1/2 binary64))) |
(sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 #s(approx (pow (cos (* 1/180 (* angle (PI)))) 2) #s(literal 1 binary64)) (*.f64 b b))))) |
(pow.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 #s(approx (pow (cos (* 1/180 (* angle (PI)))) 2) #s(literal 1 binary64)) (*.f64 b b)))) #s(literal 1/2 binary64)) |
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 #s(approx (pow (cos (* 1/180 (* angle (PI)))) 2) #s(literal 1 binary64)) (*.f64 b b))))) |
(*.f64 (sqrt.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 #s(approx (pow (cos (* 1/180 (* angle (PI)))) 2) #s(literal 1 binary64)) (*.f64 b b)))) (sqrt.f64 #s(literal 2 binary64))) |
(exp.f64 (*.f64 (log.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) #s(literal 1 binary64))) |
(sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) |
(pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 1 binary64)) |
(*.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 4 binary64) (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))) |
(*.f64 #s(literal 1 binary64) (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) |
(*.f64 (*.f64 #s(literal 4 binary64) (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) #s(literal 1/4 binary64)) |
#s(approx (pow (cos (* 1/180 (* angle (PI)))) 2) #s(literal 1 binary64)) |
(+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) |
(cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) |
(-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) |
(fma.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) |
(fma.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/4 binary64) (-.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))) (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) |
(fma.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))))) (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) |
(fma.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) |
(fma.f64 (+.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 2 binary64)) #s(literal -1/4 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) |
(fma.f64 (exp.f64 (log.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))) (exp.f64 (log.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))) (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) |
(/.f64 (-.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (+.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) |
(exp.f64 (*.f64 (log.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) #s(literal 1/2 binary64))) |
(sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) |
(pow.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) |
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (fma.f64 (*.f64 b b) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) |
(*.f64 (sqrt.f64 (fma.f64 (*.f64 b b) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (sqrt.f64 #s(literal 2 binary64))) |
#s(approx (+ (* 1/8 (/ (* (* (* y-scale (sqrt 8)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (/ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (* (+ b a) (- b a)) (* (+ b a) (- b a)))))) (* y-scale y-scale))) (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (sqrt (/ 1 (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (* x-scale x-scale))) (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (*.f64 (neg.f64 b) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) #s(literal 2 binary64)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) (*.f64 x-scale x-scale))) (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) |
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 y-scale y-scale) (*.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale))))))) |
(/.f64 (*.f64 y-scale y-scale) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)))))) |
(/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) |
(/.f64 (neg.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)))))) (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) |
(*.f64 y-scale (*.f64 y-scale (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) |
(*.f64 (*.f64 y-scale y-scale) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) |
(*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale)) |
(*.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale))))) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 x-scale #s(approx (+ (* 1/8 (/ (* (* (* y-scale (sqrt 8)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (/ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (* (+ b a) (- b a)) (* (+ b a) (- b a)))))) (* y-scale y-scale))) (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (sqrt (/ 1 (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (* x-scale x-scale))) (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (*.f64 (neg.f64 b) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) #s(literal 2 binary64)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) (*.f64 x-scale x-scale))) (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))) |
(+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) |
(cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) |
(-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) |
(fma.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) |
(fma.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/4 binary64) (-.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))) (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) |
(fma.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))))) (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) |
(fma.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) |
(fma.f64 (+.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 2 binary64)) #s(literal -1/4 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) |
(fma.f64 (exp.f64 (log.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))) (exp.f64 (log.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))) (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) |
(/.f64 (-.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (+.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) |
Compiled 301 178 to 5 610 computations (98.1% saved)
85 alts after pruning (82 fresh and 3 done)
| Pruned | Kept | Total | |
|---|---|---|---|
| New | 1 329 | 39 | 1 368 |
| Fresh | 19 | 43 | 62 |
| Picked | 4 | 1 | 5 |
| Done | 0 | 2 | 2 |
| Total | 1 352 | 85 | 1 437 |
| Status | Accuracy | Program |
|---|---|---|
| 2.6% | (/.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 b a) b) a)) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (+.f64 (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale y-scale))))))) (neg.f64 (/.f64 #s(literal -1 binary64) (*.f64 b a)))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (*.f64 #s(literal 4 binary64) (*.f64 b a)))) | |
| 2.8% | (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (exp.f64 (*.f64 (log.f64 (*.f64 x-scale y-scale)) #s(literal 2 binary64))))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) | |
| 1.2% | (*.f64 (/.f64 (sqrt.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 b (neg.f64 a)) (*.f64 #s(literal 4 binary64) (*.f64 b a))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (neg.f64 (*.f64 (*.f64 (*.f64 b a) b) a)))) (+.f64 (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 b a) (*.f64 #s(literal 4 binary64) (*.f64 b a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) | |
| 2.6% | (*.f64 (/.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (*.f64 a b)) (*.f64 #s(literal 4 binary64) (*.f64 a b)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))) (*.f64 #s(literal 8 binary64) (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (* angle (PI)) 1/180))) #s(literal 1 binary64)))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale))))))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))) | |
| 0.4% | (*.f64 (/.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (*.f64 a b)) (*.f64 #s(literal 4 binary64) (*.f64 a b)))) (/.f64 (sqrt.f64 (*.f64 #s(approx (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (*.f64 #s(literal 8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale))))))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))) | |
| 9.2% | (*.f64 (/.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (*.f64 a b)) (*.f64 #s(literal 4 binary64) (*.f64 a b)))) #s(approx (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale))))) (*.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))))) | |
| 3.6% | (*.f64 (/.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (*.f64 a b)) (*.f64 #s(literal 4 binary64) (*.f64 a b)))) #s(approx (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale))))) (*.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (*.f64 (sqrt.f64 (PI.f64)) (sqrt.f64 (PI.f64))))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))))))) | |
| 1.9% | (*.f64 (/.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (*.f64 a b)) (*.f64 #s(literal 4 binary64) (*.f64 a b)))) #s(approx (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale))))) (*.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (+ (/ (* (* a a) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale x-scale)) (/ (* (* b b) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale x-scale))) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))))))) | |
| 1.9% | (*.f64 (/.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (*.f64 a b)) (*.f64 #s(literal 4 binary64) (*.f64 a b)))) #s(approx (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale))))) (*.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (+ (/ (* (* a a) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale x-scale)) (/ (* (* b b) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale x-scale))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)))))))))) | |
| 7.8% | (*.f64 (/.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (*.f64 a b)) (*.f64 #s(literal 4 binary64) (*.f64 a b)))) #s(approx (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale))))) (*.f64 (*.f64 a a) (*.f64 (*.f64 b (*.f64 b b)) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))) | |
| 1.7% | (*.f64 #s(literal -1/4 binary64) (/.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 b a) b) a)) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (+.f64 (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale y-scale))))))) (/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 b a) b) a)) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))) | |
| 2.6% | (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 (neg.f64 (*.f64 a b)) (*.f64 #s(literal 4 binary64) (*.f64 a b))) (*.f64 (neg.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))) (*.f64 #s(literal 8 binary64) (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)))))))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))) #s(literal -1 binary64))) | |
| 37.4% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 (*.f64 b #s(literal 1/4 binary64)) (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 8 binary64)))) | |
| 5.0% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) | |
| 16.3% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) | |
| 43.1% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (pow.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (*.f64 (sqrt.f64 (PI.f64)) (sqrt.f64 (PI.f64)))))) #s(literal 2 binary64)) (*.f64 a a))))))) | |
| 43.1% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (pow.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (cbrt.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)))))) #s(literal 2 binary64)) (*.f64 a a))))))) | |
| 35.3% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 #s(approx (pow (cos (* 1/180 (* angle (PI)))) 2) #s(literal 1 binary64)) (*.f64 b b))))))) | |
| 42.0% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 #s(approx (pow (cos (* 1/180 (* angle (PI)))) 2) #s(literal 1 binary64)) (*.f64 b b) (*.f64 (pow.f64 #s(approx (sin (* 1/180 (* angle (PI)))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a))))))) | |
| 34.6% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (exp.f64 (*.f64 (log.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 #s(approx (pow (cos (* 1/180 (* angle (PI)))) 2) #s(literal 1 binary64)) (*.f64 b b))))) #s(literal 1/2 binary64))))) | |
| 34.3% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (exp.f64 (*.f64 (log.f64 (*.f64 #s(literal 2 binary64) (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))))) #s(literal 1/2 binary64))))) | |
| 26.0% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) #s(approx (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 angle angle) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))))) b) (*.f64 b (sqrt.f64 #s(literal 2 binary64))))))) | |
| 37.4% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) #s(approx (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (*.f64 b (sqrt.f64 #s(literal 2 binary64)))))) | |
| 12.5% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) #s(approx (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))) | |
| 5.7% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) #s(approx (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (neg.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))) | |
| 9.6% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) #s(approx (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (neg.f64 (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))) | |
| 40.7% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b))))))) | |
| ✓ | 37.4% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))) |
| 37.6% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 (*.f64 y-scale (exp.f64 (*.f64 (log.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 8 binary64))))) | |
| 37.3% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) b) #s(approx (* (* y-scale (sqrt 2)) (sqrt 8)) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))) | |
| 20.9% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(approx (+ (* 1/8 (/ (* (* (* y-scale (sqrt 8)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (/ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (* (+ b a) (- b a)) (* (+ b a) (- b a)))))) (* y-scale y-scale))) (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (sqrt (/ 1 (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (* x-scale x-scale))) (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 #s(literal 0 binary64) (*.f64 b b)))) (*.f64 a (*.f64 x-scale x-scale))) (*.f64 (*.f64 #s(literal 1/4 binary64) a) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) x-scale)) | |
| 21.3% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(approx (+ (* 1/8 (/ (* (* (* y-scale (sqrt 8)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (/ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (* (+ b a) (- b a)) (* (+ b a) (- b a)))))) (* y-scale y-scale))) (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (sqrt (/ 1 (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (* x-scale x-scale))) (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) x-scale)) | |
| 12.5% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(approx (+ (* 1/8 (/ (* (* (* y-scale (sqrt 8)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (/ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (* (+ b a) (- b a)) (* (+ b a) (- b a)))))) (* y-scale y-scale))) (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (sqrt (/ 1 (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (* x-scale x-scale))) (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (*.f64 (neg.f64 b) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 #s(literal 2 binary64) #s(approx (+ (* 1/2 (* (* y-scale y-scale) (/ (* 2 (* (+ (* 1/2 (cos (* 2 (* 1/180 (* angle (PI)))))) 1/2) (/ (+ 1/2 (* -1/2 (cos (* 2 (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ 1/2 (* -1/2 (cos (* 2 (* 1/180 (* angle (PI)))))))))) (+ (* 1/2 (cos (* 2 (* 1/180 (* angle (PI)))))) 1/2)) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 4 binary64) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) x-scale)) | |
| 5.9% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 x-scale #s(approx (+ (* 1/8 (/ (* (* (* y-scale (sqrt 8)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (/ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (* (+ b a) (- b a)) (* (+ b a) (- b a)))))) (* y-scale y-scale))) (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (sqrt (/ 1 (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (* x-scale x-scale))) (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (neg.f64 (*.f64 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (*.f64 (sqrt.f64 (PI.f64)) (sqrt.f64 (PI.f64)))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))))) | |
| 5.3% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 x-scale #s(approx (+ (* 1/8 (/ (* (* (* y-scale (sqrt 8)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (/ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (* (+ b a) (- b a)) (* (+ b a) (- b a)))))) (* y-scale y-scale))) (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (sqrt (/ 1 (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (* x-scale x-scale))) (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (neg.f64 (*.f64 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (cbrt.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))))) | |
| 4.6% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 x-scale #s(approx (+ (* 1/8 (/ (* (* (* y-scale (sqrt 8)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (/ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (* (+ b a) (- b a)) (* (+ b a) (- b a)))))) (* y-scale y-scale))) (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (sqrt (/ 1 (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (* x-scale x-scale))) (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) #s(approx (neg (* b (+ (* 1/8 (/ (* (* y-scale y-scale) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (* y-scale y-scale) (* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* y-scale y-scale)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (* x-scale x-scale) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))) (/.f64 (+.f64 (neg.f64 (*.f64 (*.f64 (*.f64 angle angle) b) (fma.f64 #s(literal 1/720 binary64) (*.f64 (*.f64 (PI.f64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (PI.f64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 x-scale x-scale)) #s(literal -1/216 binary64)))))) (*.f64 #s(literal -45 binary64) (/.f64 (*.f64 (*.f64 b (*.f64 y-scale y-scale)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (*.f64 x-scale x-scale) (PI.f64))))) angle))))) | |
| 7.9% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 x-scale #s(approx (+ (* 1/8 (/ (* (* (* y-scale (sqrt 8)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (/ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (* (+ b a) (- b a)) (* (+ b a) (- b a)))))) (* y-scale y-scale))) (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (sqrt (/ 1 (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (* x-scale x-scale))) (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) #s(approx (neg (* b (+ (* 1/8 (/ (* (* y-scale y-scale) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (* y-scale y-scale) (* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* y-scale y-scale)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (* x-scale x-scale) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))) (/.f64 (*.f64 #s(literal -45 binary64) (*.f64 (*.f64 b (*.f64 y-scale y-scale)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 angle (*.f64 (*.f64 x-scale x-scale) (PI.f64)))))))) | |
| 9.2% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 x-scale #s(approx (+ (* 1/8 (/ (* (* (* y-scale (sqrt 8)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (/ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (* (+ b a) (- b a)) (* (+ b a) (- b a)))))) (* y-scale y-scale))) (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (sqrt (/ 1 (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (* x-scale x-scale))) (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) #s(approx (neg (* b (+ (* 1/8 (/ (* (* y-scale y-scale) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (* y-scale y-scale) (* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* y-scale y-scale)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (* x-scale x-scale) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 b (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))) | |
| ✓ | 37.6% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* y-scale 4) (* b 1/4)) (*.f64 b y-scale))) |
| 23.2% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 angle angle) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))))))))) b) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))) | |
| 35.1% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 (*.f64 (*.f64 b y-scale) (*.f64 #s(literal 4 binary64) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) #s(literal 1/4 binary64)))) | |
| 13.3% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 (*.f64 (*.f64 a y-scale) (*.f64 #s(literal 4 binary64) (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))) #s(literal 1/4 binary64)))) | |
| 13.2% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a y-scale) (*.f64 #s(approx (sin (* 1/180 (* angle (PI)))) (*.f64 angle (fma.f64 (*.f64 #s(literal -1/34992000 binary64) (*.f64 angle angle)) (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/180 binary64) (PI.f64))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))) | |
| 14.6% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a y-scale) (*.f64 #s(approx (sin (* 1/180 (* angle (PI)))) (*.f64 angle (fma.f64 #s(literal 1/180 binary64) (PI.f64) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/34992000 binary64) (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 angle angle)) (pow.f64 (PI.f64) #s(literal 5 binary64)))))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))) | |
| 14.2% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a y-scale) (*.f64 #s(approx (sin (* 1/180 (* angle (PI)))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))) | |
| 34.6% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (*.f64 (sqrt.f64 (PI.f64)) (sqrt.f64 (PI.f64)))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))) | |
| 34.6% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (cbrt.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))) | |
| ✓ | 34.8% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))) |
| 39.1% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 #s(approx (cos (* 1/180 (* angle (PI)))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/64800 binary64) (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 #s(literal 1/25194240000 binary64) (*.f64 angle angle)) (pow.f64 (PI.f64) #s(literal 4 binary64))))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))) | |
| 12.5% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 a (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))) | |
| 12.6% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 a (*.f64 y-scale (*.f64 #s(literal 4 binary64) (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))))) | |
| 37.3% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 #s(literal 1/4 binary64) #s(approx (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (*.f64 (*.f64 b y-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))) | |
| 12.5% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 a y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))) | |
| 5.7% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))) | |
| 9.6% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 a (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))) | |
| 13.7% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) #s(approx (* 1/4 (* (* a y-scale) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (*.f64 (*.f64 #s(literal 1/720 binary64) a) (*.f64 (*.f64 angle y-scale) (*.f64 (*.f64 (PI.f64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))))))) | |
| 13.1% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) #s(approx (* 1/4 (* (* a y-scale) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (*.f64 angle (fma.f64 (*.f64 #s(literal -1/139968000 binary64) a) (*.f64 (*.f64 (*.f64 angle angle) y-scale) (*.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 #s(literal 1/720 binary64) a) (*.f64 (*.f64 y-scale (PI.f64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))))) | |
| 13.0% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) #s(approx (* 1/4 (* (* a y-scale) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (*.f64 angle (fma.f64 #s(literal 1/720 binary64) (*.f64 a (*.f64 (*.f64 y-scale (PI.f64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 angle angle) (fma.f64 (*.f64 #s(literal -1/139968000 binary64) a) (*.f64 y-scale (*.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 #s(literal 1/90699264000000 binary64) a) (*.f64 (*.f64 (*.f64 angle angle) y-scale) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))))))) | |
| 4.6% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* x-scale (+ (* 1/8 (/ (* (* (* y-scale (sqrt 8)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (/ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (* (+ b a) (- b a)) (* (+ b a) (- b a)))))) (* y-scale y-scale))) (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (sqrt (/ 1 (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (* x-scale x-scale))) (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale)))))))) (*.f64 (*.f64 b x-scale) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))) | |
| 40.6% | #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* x-scale (+ (* 1/8 (/ (* (* (* y-scale (sqrt 8)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (/ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (* (+ b a) (- b a)) (* (+ b a) (- b a)))))) (* y-scale y-scale))) (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (sqrt (/ 1 (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (* x-scale x-scale))) (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale)))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) | |
| 4.5% | #s(approx (* (/ -1 (* (neg (* a b)) (* 4 (* a b)))) (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))) | |
| 13.2% | #s(approx (* (/ -1 (* (neg (* a b)) (* 4 (* a b)))) (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))) | |
| 14.6% | #s(approx (* (/ -1 (* (neg (* a b)) (* 4 (* a b)))) (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))))) | |
| 20.5% | #s(approx (* (/ -1 (* (neg (* a b)) (* 4 (* a b)))) (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) a) y-scale) (/.f64 a y-scale) (/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 y-scale y-scale))))))) | |
| 4.5% | #s(approx (* (/ -1 (* (neg (* a b)) (* 4 (* a b)))) (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (/.f64 (fma.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (/.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 y-scale y-scale) #s(literal 1 binary64))) (*.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))))))) | |
| 8.7% | #s(approx (* (/ -1 (* (neg (* a b)) (* 4 (* a b)))) (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 y-scale y-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))))))) | |
| 20.8% | #s(approx (* (/ -1 (* (neg (* a b)) (* 4 (* a b)))) (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) | |
| 17.6% | #s(approx (* (/ -1 (* (neg (* a b)) (* 4 (* a b)))) (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale))))))) | |
| 17.6% | #s(approx (* (/ -1 (* (neg (* a b)) (* 4 (* a b)))) (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 #s(literal 1/4 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (/.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 y-scale y-scale))))))) | |
| 8.0% | #s(approx (* (/ -1 (* (neg (* a b)) (* 4 (* a b)))) (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))) (*.f64 y-scale y-scale))))))) | |
| 10.1% | #s(approx (* (/ -1 (* (neg (* a b)) (* 4 (* a b)))) (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (+ (/ (* (* a a) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale)) (/ (* (* b b) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale))) (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) | |
| 8.3% | #s(approx (* (/ -1 (* (neg (* a b)) (* 4 (* a b)))) (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (+ (/ (* (* a a) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale)) (/ (* (* b b) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale))) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))) | |
| 21.3% | #s(approx (* (/ -1 (* (neg (* a b)) (* 4 (* a b)))) (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (+ (/ (* (* a a) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale)) (/ (* (* b b) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) | |
| 7.8% | #s(approx (* (/ -1 (* (neg (* a b)) (* 4 (* a b)))) (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (+ (/ (* (* a a) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale)) (/ (* (* b b) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale))) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))))))))) | |
| 17.3% | #s(approx (* (/ -1 (* (neg (* a b)) (* 4 (* a b)))) (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (exp.f64 (*.f64 (log.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) #s(literal 1/2 binary64))))) | |
| 31.3% | #s(approx (* (/ -1 (* (neg (* a b)) (* 4 (* a b)))) (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) #s(approx (sqrt (* 2 (+ (/ (* (* a a) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale)) (/ (* (* b b) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale))))) (/.f64 (*.f64 a (sqrt.f64 #s(literal 2 binary64))) y-scale)))) | |
| 10.7% | #s(approx (* (/ -1 (* (neg (* a b)) (* 4 (* a b)))) (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) #s(approx (sqrt (* 2 (+ (/ (* (* a a) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale)) (/ (* (* b b) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale))))) (*.f64 (/.f64 (*.f64 b (sqrt.f64 #s(literal 2 binary64))) y-scale) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))) | |
| 31.2% | #s(approx (* (/ -1 (* (neg (* a b)) (* 4 (* a b)))) (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) #s(approx (sqrt (* 2 (+ (/ (* (* a a) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale)) (/ (* (* b b) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale))))) (*.f64 (/.f64 (*.f64 a (sqrt.f64 #s(literal 2 binary64))) y-scale) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))) | |
| 32.3% | #s(approx (* (/ -1 (* (neg (* a b)) (* 4 (* a b)))) (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) #s(approx (sqrt (* 2 (+ (/ (* (* a a) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale)) (/ (* (* b b) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) y-scale) (sqrt.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))))) | |
| 7.7% | #s(approx (* (/ -1 (* (neg (* a b)) (* 4 (* a b)))) (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) #s(approx (sqrt (* 2 (+ (/ (* (* a a) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale)) (/ (* (* b b) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale))))) (*.f64 (*.f64 b (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))))))) | |
| 21.5% | #s(approx (* (/ -1 (* (neg (* a b)) (* 4 (* a b)))) (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) #s(approx (sqrt (* 2 (+ (/ (* (* a a) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale)) (/ (* (* b b) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale))))) (*.f64 (*.f64 a (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))))))) | |
| 10.1% | #s(approx (* (/ -1 (* (neg (* a b)) (* 4 (* a b)))) (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) #s(approx (sqrt (* 2 (+ (/ (* (* a a) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale)) (/ (* (* b b) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale))))) (*.f64 b (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 a a) (sqrt.f64 #s(literal 2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 b b) (*.f64 y-scale y-scale))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))))))))) | |
| 14.2% | #s(approx (* (/ -1 (* (neg (* a b)) (* 4 (* a b)))) (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) #s(approx (sqrt (* 2 (+ (/ (* (* a a) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale)) (/ (* (* b b) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale))))) (*.f64 a (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 b b) (sqrt.f64 #s(literal 2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))))))))) | |
| 35.1% | #s(approx (* (/ -1 (* (neg (* a b)) (* 4 (* a b)))) (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))))) | |
| 9.6% | #s(approx (* (/ -1 (* (neg (* a b)) (* 4 (* a b)))) (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale)))))) (*.f64 a (fma.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 b #s(literal 0 binary64)))) (*.f64 a (*.f64 x-scale y-scale))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))))))))) |
Compiled 15 896 to 3 783 computations (76.2% saved)
| Inputs |
|---|
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* y-scale 4) (* b 1/4)) (*.f64 b y-scale))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 y-scale #s(literal 4 binary64)) (*.f64 b #s(literal 1/4 binary64)))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 #s(literal 1/4 binary64) #s(approx (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (*.f64 (*.f64 b y-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) b) #s(approx (* (* y-scale (sqrt 2)) (sqrt 8)) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) #s(approx (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (*.f64 b (sqrt.f64 #s(literal 2 binary64)))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 (*.f64 b #s(literal 1/4 binary64)) (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 8 binary64)))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) #s(approx (* 1/4 (* (* a y-scale) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (*.f64 (*.f64 #s(literal 1/720 binary64) a) (*.f64 (*.f64 angle y-scale) (*.f64 (*.f64 (PI.f64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a y-scale) (*.f64 #s(approx (sin (* 1/180 (* angle (PI)))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))) |
#s(approx (* (/ -1 (* (neg (* a b)) (* 4 (* a b)))) (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) #s(approx (sqrt (* 2 (+ (/ (* (* a a) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale)) (/ (* (* b b) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale))))) (/.f64 (*.f64 a (sqrt.f64 #s(literal 2 binary64))) y-scale)))) |
#s(approx (* (/ -1 (* (neg (* a b)) (* 4 (* a b)))) (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (+ (/ (* (* a a) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale)) (/ (* (* b b) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 x-scale #s(approx (+ (* 1/8 (/ (* (* (* y-scale (sqrt 8)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (/ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (* (+ b a) (- b a)) (* (+ b a) (- b a)))))) (* y-scale y-scale))) (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (sqrt (/ 1 (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (* x-scale x-scale))) (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) #s(approx (neg (* b (+ (* 1/8 (/ (* (* y-scale y-scale) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (* y-scale y-scale) (* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* y-scale y-scale)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (* x-scale x-scale) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))) (/.f64 (*.f64 #s(literal -45 binary64) (*.f64 (*.f64 b (*.f64 y-scale y-scale)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 angle (*.f64 (*.f64 x-scale x-scale) (PI.f64)))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a y-scale) (*.f64 #s(approx (sin (* 1/180 (* angle (PI)))) (*.f64 angle (fma.f64 (*.f64 #s(literal -1/34992000 binary64) (*.f64 angle angle)) (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/180 binary64) (PI.f64))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))) |
(*.f64 (/.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (*.f64 a b)) (*.f64 #s(literal 4 binary64) (*.f64 a b)))) #s(approx (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale))))) (*.f64 (*.f64 a a) (*.f64 (*.f64 b (*.f64 b b)) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) #s(approx (* 1/4 (* (* a y-scale) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (*.f64 angle (fma.f64 (*.f64 #s(literal -1/139968000 binary64) a) (*.f64 (*.f64 (*.f64 angle angle) y-scale) (*.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 #s(literal 1/720 binary64) a) (*.f64 (*.f64 y-scale (PI.f64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 x-scale #s(approx (+ (* 1/8 (/ (* (* (* y-scale (sqrt 8)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (/ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (* (+ b a) (- b a)) (* (+ b a) (- b a)))))) (* y-scale y-scale))) (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (sqrt (/ 1 (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (* x-scale x-scale))) (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 #s(literal 0 binary64) (*.f64 b b))))) (*.f64 a (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/4 binary64) (*.f64 a (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 x-scale #s(approx (+ (* 1/8 (/ (* (* (* y-scale (sqrt 8)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (/ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (* (+ b a) (- b a)) (* (+ b a) (- b a)))))) (* y-scale y-scale))) (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (sqrt (/ 1 (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (* x-scale x-scale))) (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 #s(literal 0 binary64) (*.f64 b b)))) (*.f64 a (*.f64 x-scale x-scale))) (*.f64 (*.f64 #s(literal 1/4 binary64) a) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(approx (+ (* 1/8 (/ (* (* (* y-scale (sqrt 8)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (/ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (* (+ b a) (- b a)) (* (+ b a) (- b a)))))) (* y-scale y-scale))) (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (sqrt (/ 1 (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (* x-scale x-scale))) (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 #s(literal 0 binary64) (*.f64 b b)))) (*.f64 a (*.f64 x-scale x-scale))) (*.f64 (*.f64 #s(literal 1/4 binary64) a) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) x-scale)) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) #s(approx (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 angle angle) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))))))) b) (*.f64 b (sqrt.f64 #s(literal 2 binary64))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) #s(approx (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 angle angle) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))))) b) (*.f64 b (sqrt.f64 #s(literal 2 binary64))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 a (*.f64 y-scale (*.f64 #s(literal 4 binary64) (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 (*.f64 (*.f64 a y-scale) (*.f64 #s(literal 4 binary64) (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))) #s(literal 1/4 binary64)))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 (*.f64 (*.f64 b y-scale) (*.f64 #s(literal 4 binary64) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) #s(literal 1/4 binary64)))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 angle angle) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))))))))) b) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))) |
#s(approx (* (/ -1 (* (neg (* a b)) (* 4 (* a b)))) (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (+ (/ (* (* a a) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale)) (/ (* (* b b) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale))) (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 a (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 a y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 a (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 x-scale #s(approx (+ (* 1/8 (/ (* (* (* y-scale (sqrt 8)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (/ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (* (+ b a) (- b a)) (* (+ b a) (- b a)))))) (* y-scale y-scale))) (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (sqrt (/ 1 (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (* x-scale x-scale))) (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) #s(approx (neg (* b (+ (* 1/8 (/ (* (* y-scale y-scale) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (* y-scale y-scale) (* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* y-scale y-scale)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (* x-scale x-scale) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 b (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) #s(approx (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) #s(approx (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (*.f64 b (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) #s(approx (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (neg.f64 (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) #s(approx (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (neg.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 #s(approx (pow (cos (* 1/180 (* angle (PI)))) 2) #s(literal 1 binary64)) (*.f64 b b) (*.f64 (pow.f64 #s(approx (sin (* 1/180 (* angle (PI)))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 #s(approx (pow (cos (* 1/180 (* angle (PI)))) 2) #s(literal 1 binary64)) (*.f64 b b))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (*.f64 (sqrt.f64 (PI.f64)) (sqrt.f64 (PI.f64)))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 #s(approx (cos (* 1/180 (* angle (PI)))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/64800 binary64) (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 #s(literal 1/25194240000 binary64) (*.f64 angle angle)) (pow.f64 (PI.f64) #s(literal 4 binary64))))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))) |
#s(approx (* (/ -1 (* (neg (* a b)) (* 4 (* a b)))) (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) #s(approx (sqrt (* 2 (+ (/ (* (* a a) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale)) (/ (* (* b b) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale))))) (*.f64 (/.f64 (*.f64 a (sqrt.f64 #s(literal 2 binary64))) y-scale) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))) |
#s(approx (* (/ -1 (* (neg (* a b)) (* 4 (* a b)))) (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) #s(approx (sqrt (* 2 (+ (/ (* (* a a) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale)) (/ (* (* b b) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale))))) (*.f64 (/.f64 (*.f64 b (sqrt.f64 #s(literal 2 binary64))) y-scale) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))) |
#s(approx (* (/ -1 (* (neg (* a b)) (* 4 (* a b)))) (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (+ (/ (* (* a a) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale)) (/ (* (* b b) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale))) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 a a) (*.f64 (*.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64))) (*.f64 b b))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a y-scale) (*.f64 #s(approx (sin (* 1/180 (* angle (PI)))) (*.f64 angle (fma.f64 #s(literal 1/180 binary64) (PI.f64) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/34992000 binary64) (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 angle angle)) (pow.f64 (PI.f64) #s(literal 5 binary64)))))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))) |
#s(approx (* (/ -1 (* (neg (* a b)) (* 4 (* a b)))) (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (+ (/ (* (* a a) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale)) (/ (* (* b b) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale))) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 x-scale #s(approx (+ (* 1/8 (/ (* (* (* y-scale (sqrt 8)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (/ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (* (+ b a) (- b a)) (* (+ b a) (- b a)))))) (* y-scale y-scale))) (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (sqrt (/ 1 (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (* x-scale x-scale))) (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) #s(approx (neg (* b (+ (* 1/8 (/ (* (* y-scale y-scale) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (* y-scale y-scale) (* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* y-scale y-scale)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (* x-scale x-scale) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))) (/.f64 (+.f64 (neg.f64 (*.f64 (*.f64 (*.f64 angle angle) b) (fma.f64 #s(literal 1/720 binary64) (*.f64 (*.f64 (PI.f64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (PI.f64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 x-scale x-scale)) #s(literal -1/216 binary64)))))) (*.f64 #s(literal -45 binary64) (/.f64 (*.f64 (*.f64 b (*.f64 y-scale y-scale)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (*.f64 x-scale x-scale) (PI.f64))))) angle))))) |
#s(approx (* (/ -1 (* (neg (* a b)) (* 4 (* a b)))) (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) #s(approx (sqrt (* 2 (+ (/ (* (* a a) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale)) (/ (* (* b b) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale))))) (*.f64 (*.f64 a (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))))))) |
#s(approx (* (/ -1 (* (neg (* a b)) (* 4 (* a b)))) (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) #s(approx (sqrt (* 2 (+ (/ (* (* a a) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale)) (/ (* (* b b) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale))))) (*.f64 (*.f64 b (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 (*.f64 y-scale (exp.f64 (*.f64 (log.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 8 binary64))))) |
(*.f64 (/.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (*.f64 a b)) (*.f64 #s(literal 4 binary64) (*.f64 a b)))) #s(approx (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale))))) (*.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (+ (/ (* (* a a) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale x-scale)) (/ (* (* b b) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale x-scale))) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))))))) |
(*.f64 (/.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (*.f64 a b)) (*.f64 #s(literal 4 binary64) (*.f64 a b)))) #s(approx (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale))))) (*.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (+ (/ (* (* a a) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale x-scale)) (/ (* (* b b) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale x-scale))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)))))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 #s(literal 1/4 binary64) #s(approx (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (fma.f64 b (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/64800 binary64) (*.f64 b (*.f64 (*.f64 y-scale (*.f64 (PI.f64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 #s(literal 1/25194240000 binary64) (*.f64 (*.f64 (*.f64 angle angle) b) (*.f64 (*.f64 y-scale (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (cbrt.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 #s(approx (pow (cos (* 1/180 (* angle (PI)))) 2) #s(literal 1 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) #s(approx (* 1/4 (* (* a y-scale) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (*.f64 angle (fma.f64 #s(literal 1/720 binary64) (*.f64 a (*.f64 (*.f64 y-scale (PI.f64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 angle angle) (fma.f64 (*.f64 #s(literal -1/139968000 binary64) a) (*.f64 y-scale (*.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 #s(literal 1/90699264000000 binary64) a) (*.f64 (*.f64 (*.f64 angle angle) y-scale) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(approx (+ (* 1/8 (/ (* (* (* y-scale (sqrt 8)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (/ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (* (+ b a) (- b a)) (* (+ b a) (- b a)))))) (* y-scale y-scale))) (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (sqrt (/ 1 (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (* x-scale x-scale))) (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (*.f64 (neg.f64 b) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 #s(literal 2 binary64) #s(approx (+ (* 1/2 (* (* y-scale y-scale) (/ (* 2 (* (+ (* 1/2 (cos (* 2 (* 1/180 (* angle (PI)))))) 1/2) (/ (+ 1/2 (* -1/2 (cos (* 2 (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ 1/2 (* -1/2 (cos (* 2 (* 1/180 (* angle (PI)))))))))) (+ (* 1/2 (cos (* 2 (* 1/180 (* angle (PI)))))) 1/2)) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 4 binary64) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) x-scale)) |
#s(approx (* (/ -1 (* (neg (* a b)) (* 4 (* a b)))) (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))))) |
#s(approx (* (/ -1 (* (neg (* a b)) (* 4 (* a b)))) (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))))) |
#s(approx (* (/ -1 (* (neg (* a b)) (* 4 (* a b)))) (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (pow.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 #s(approx (sin (* 1/180 (* angle (PI)))) (*.f64 angle (fma.f64 (*.f64 #s(literal -1/34992000 binary64) (*.f64 angle angle)) (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/180 binary64) (PI.f64))))) #s(literal 2 binary64)) (*.f64 a a))))))) |
#s(approx (* (/ -1 (* (neg (* a b)) (* 4 (* a b)))) (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) #s(approx (sqrt (* 2 (+ (/ (* (* a a) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale)) (/ (* (* b b) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) y-scale) (sqrt.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))))) |
#s(approx (* (/ -1 (* (neg (* a b)) (* 4 (* a b)))) (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))))))) |
#s(approx (* (/ -1 (* (neg (* a b)) (* 4 (* a b)))) (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))))) |
#s(approx (* (/ -1 (* (neg (* a b)) (* 4 (* a b)))) (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))) |
#s(approx (* (/ -1 (* (neg (* a b)) (* 4 (* a b)))) (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) a) y-scale) (/.f64 a y-scale) (/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 y-scale y-scale))))))) |
#s(approx (* (/ -1 (* (neg (* a b)) (* 4 (* a b)))) (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))) |
(*.f64 (/.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (*.f64 a b)) (*.f64 #s(literal 4 binary64) (*.f64 a b)))) #s(approx (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale))))) (*.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))))) |
#s(approx (* (/ -1 (* (neg (* a b)) (* 4 (* a b)))) (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 y-scale y-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (exp.f64 (*.f64 (log.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 #s(approx (pow (cos (* 1/180 (* angle (PI)))) 2) #s(literal 1 binary64)) (*.f64 b b))))) #s(literal 1/2 binary64))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (pow.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a))))))) |
(/.f64 #s(approx (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale))))) (*.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 b a) (*.f64 #s(literal 4 binary64) (*.f64 b a)))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (exp.f64 (*.f64 (log.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 a a) (*.f64 (*.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64))) (*.f64 b b))))) #s(literal 1/2 binary64))))) |
(*.f64 (/.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (*.f64 a b)) (*.f64 #s(literal 4 binary64) (*.f64 a b)))) #s(approx (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale))))) (*.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (pow.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (*.f64 (sqrt.f64 (PI.f64)) (sqrt.f64 (PI.f64)))))) #s(literal 2 binary64)) (*.f64 a a))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 #s(approx (sin (* 1/180 (* angle (PI)))) (*.f64 angle (fma.f64 #s(literal -1/34992000 binary64) (*.f64 (*.f64 angle angle) (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64)))) (*.f64 #s(literal 1/180 binary64) (PI.f64))))) #s(literal 2 binary64)) (*.f64 a a))))))) |
(*.f64 (/.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (*.f64 a b)) (*.f64 #s(literal 4 binary64) (*.f64 a b)))) #s(approx (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale))))) (*.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (*.f64 (sqrt.f64 (PI.f64)) (sqrt.f64 (PI.f64))))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))))))) |
#s(approx (* (/ -1 (* (neg (* a b)) (* 4 (* a b)))) (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (pow.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (cbrt.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)))))) #s(literal 2 binary64)) (*.f64 a a))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a))))))) |
#s(approx (* (/ -1 (* (neg (* a b)) (* 4 (* a b)))) (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (/.f64 (fma.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (/.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 y-scale y-scale) #s(literal 1 binary64))) (*.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* x-scale (+ (* 1/8 (/ (* (* (* y-scale (sqrt 8)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (/ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (* (+ b a) (- b a)) (* (+ b a) (- b a)))))) (* y-scale y-scale))) (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (sqrt (/ 1 (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (* x-scale x-scale))) (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale)))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (exp.f64 (*.f64 (log.f64 (*.f64 #s(literal 2 binary64) (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))))) #s(literal 1/2 binary64))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) #s(approx (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))) |
#s(approx (* (/ -1 (* (neg (* a b)) (* 4 (* a b)))) (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (exp.f64 (*.f64 (log.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) #s(literal 1/2 binary64))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 x-scale #s(approx (+ (* 1/8 (/ (* (* (* y-scale (sqrt 8)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (/ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (* (+ b a) (- b a)) (* (+ b a) (- b a)))))) (* y-scale y-scale))) (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (sqrt (/ 1 (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (* x-scale x-scale))) (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(approx (+ (* 1/8 (/ (* (* (* y-scale (sqrt 8)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (/ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (* (+ b a) (- b a)) (* (+ b a) (- b a)))))) (* y-scale y-scale))) (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (sqrt (/ 1 (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (* x-scale x-scale))) (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) x-scale)) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 x-scale #s(approx (+ (* 1/8 (/ (* (* (* y-scale (sqrt 8)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (/ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (* (+ b a) (- b a)) (* (+ b a) (- b a)))))) (* y-scale y-scale))) (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (sqrt (/ 1 (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (* x-scale x-scale))) (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) #s(approx (neg (* b (+ (* 1/8 (/ (* (* y-scale y-scale) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (* y-scale y-scale) (* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* y-scale y-scale)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (* x-scale x-scale) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))) (neg.f64 (*.f64 b (*.f64 #s(literal 1/4 binary64) (fma.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))))) |
#s(approx (* (/ -1 (* (neg (* a b)) (* 4 (* a b)))) (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) #s(approx (sqrt (* 2 (+ (/ (* (* a a) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale)) (/ (* (* b b) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale))))) (*.f64 a (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 b b) (sqrt.f64 #s(literal 2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))))))))) |
#s(approx (* (/ -1 (* (neg (* a b)) (* 4 (* a b)))) (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) #s(approx (sqrt (* 2 (+ (/ (* (* a a) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale)) (/ (* (* b b) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale))))) (*.f64 b (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 a a) (sqrt.f64 #s(literal 2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 b b) (*.f64 y-scale y-scale))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))))))))) |
#s(approx (* (/ -1 (* (neg (* a b)) (* 4 (* a b)))) (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 x-scale #s(approx (+ (* 1/8 (/ (* (* (* y-scale (sqrt 8)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (/ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (* (+ b a) (- b a)) (* (+ b a) (- b a)))))) (* y-scale y-scale))) (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (sqrt (/ 1 (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (* x-scale x-scale))) (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) #s(approx (neg (* b (+ (* 1/8 (/ (* (* y-scale y-scale) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (* y-scale y-scale) (* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* y-scale y-scale)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (* x-scale x-scale) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 b (*.f64 (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 b (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))))) |
#s(approx (* (/ -1 (* (neg (* a b)) (* 4 (* a b)))) (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 #s(literal 1/4 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (/.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 y-scale y-scale))))))) |
#s(approx (* (/ -1 (* (neg (* a b)) (* 4 (* a b)))) (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))) (*.f64 y-scale y-scale))))))) |
(*.f64 (/.f64 (sqrt.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 b (neg.f64 a)) (*.f64 #s(literal 4 binary64) (*.f64 b a))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (neg.f64 (*.f64 (*.f64 (*.f64 b a) b) a)))) (+.f64 (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 b a) (*.f64 #s(literal 4 binary64) (*.f64 b a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 x-scale #s(approx (+ (* 1/8 (/ (* (* (* y-scale (sqrt 8)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (/ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (* (+ b a) (- b a)) (* (+ b a) (- b a)))))) (* y-scale y-scale))) (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (sqrt (/ 1 (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (* x-scale x-scale))) (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (neg.f64 (*.f64 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) #s(approx (/ (* (* y-scale y-scale) (* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* y-scale y-scale)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (+.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/16200 binary64) (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 angle angle) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 angle angle) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))))))))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(approx (+ (* 1/8 (/ (* (* (* y-scale (sqrt 8)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (/ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (* (+ b a) (- b a)) (* (+ b a) (- b a)))))) (* y-scale y-scale))) (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (sqrt (/ 1 (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (* x-scale x-scale))) (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (*.f64 (neg.f64 b) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 4 binary64) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) x-scale)) |
#s(approx (* (/ -1 (* (neg (* a b)) (* 4 (* a b)))) (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 a (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))))))) |
#s(approx (* (/ -1 (* (neg (* a b)) (* 4 (* a b)))) (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))))) |
#s(approx (* (/ -1 (* (neg (* a b)) (* 4 (* a b)))) (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))))) |
#s(approx (* (/ -1 (* (neg (* a b)) (* 4 (* a b)))) (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))))))))) |
#s(approx (* (/ -1 (* (neg (* a b)) (* 4 (* a b)))) (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))))))) |
#s(approx (* (/ -1 (* (neg (* a b)) (* 4 (* a b)))) (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))))))) |
#s(approx (* (/ -1 (* (neg (* a b)) (* 4 (* a b)))) (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))) |
#s(approx (* (/ -1 (* (neg (* a b)) (* 4 (* a b)))) (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* x-scale (+ (* 1/8 (/ (* (* (* y-scale (sqrt 8)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (/ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (* (+ b a) (- b a)) (* (+ b a) (- b a)))))) (* y-scale y-scale))) (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (sqrt (/ 1 (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (* x-scale x-scale))) (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale)))))))) (*.f64 (*.f64 b x-scale) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 x-scale #s(approx (+ (* 1/8 (/ (* (* (* y-scale (sqrt 8)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (/ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (* (+ b a) (- b a)) (* (+ b a) (- b a)))))) (* y-scale y-scale))) (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (sqrt (/ 1 (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (* x-scale x-scale))) (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (*.f64 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 x-scale #s(approx (+ (* 1/8 (/ (* (* (* y-scale (sqrt 8)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (/ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (* (+ b a) (- b a)) (* (+ b a) (- b a)))))) (* y-scale y-scale))) (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (sqrt (/ 1 (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (* x-scale x-scale))) (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (neg.f64 (*.f64 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 x-scale #s(approx (+ (* 1/8 (/ (* (* (* y-scale (sqrt 8)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (/ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (* (+ b a) (- b a)) (* (+ b a) (- b a)))))) (* y-scale y-scale))) (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (sqrt (/ 1 (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (* x-scale x-scale))) (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (neg.f64 (*.f64 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (*.f64 (sqrt.f64 (PI.f64)) (sqrt.f64 (PI.f64)))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))))) |
(/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 x-scale #s(approx (+ (* 1/8 (/ (* (* (* y-scale (sqrt 8)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (/ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (* (+ b a) (- b a)) (* (+ b a) (- b a)))))) (* y-scale y-scale))) (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (sqrt (/ 1 (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (* x-scale x-scale))) (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (neg.f64 (*.f64 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (cbrt.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))))) |
(/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (exp.f64 (*.f64 (log.f64 (*.f64 x-scale y-scale)) #s(literal 2 binary64))))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) |
(*.f64 (/.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (*.f64 a b)) (*.f64 #s(literal 4 binary64) (*.f64 a b)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))) (*.f64 #s(literal 8 binary64) (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (* angle (PI)) 1/180))) #s(literal 1 binary64)))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale))))))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))) |
(*.f64 #s(literal -1/4 binary64) (/.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 b a) b) a)) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (+.f64 (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale y-scale))))))) (/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 b a) b) a)) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) #s(approx (/ (+ (* -2 (* (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (/ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (* (+ b a) (- b a)) (* (+ b a) (- b a)))))) (* y-scale y-scale))) (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale)))) (*.f64 #s(literal -2 binary64) (*.f64 b b))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))))))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))))))))) |
(*.f64 (/.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))) (*.f64 #s(literal 8 binary64) (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale))))))) (*.f64 (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))) #s(literal -4 binary64))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) |
(/.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 b a) b) a)) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (+.f64 (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale y-scale))))))) (neg.f64 (/.f64 #s(literal -1 binary64) (*.f64 b a)))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (*.f64 #s(literal 4 binary64) (*.f64 b a)))) |
(*.f64 (/.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (*.f64 a b)) (*.f64 #s(literal 4 binary64) (*.f64 a b)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))) (*.f64 #s(literal 8 binary64) (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale))))))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))) |
(*.f64 (*.f64 (neg.f64 (/.f64 #s(literal -1 binary64) (*.f64 b a))) (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (*.f64 b a)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))) (*.f64 #s(literal 8 binary64) (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale))))))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (fma.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 a #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) |
(*.f64 (/.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (*.f64 a b)) (*.f64 #s(literal 4 binary64) (*.f64 a b)))) (/.f64 (sqrt.f64 (*.f64 #s(approx (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (*.f64 #s(literal 8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale))))))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))) |
(exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 (neg.f64 (*.f64 a b)) (*.f64 #s(literal 4 binary64) (*.f64 a b))) (*.f64 (neg.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))) (*.f64 #s(literal 8 binary64) (neg.f64 (*.f64 b (*.f64 b (*.f64 a a)))))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (+.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)))))))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))) #s(literal -1 binary64))) |
(/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (exp.f64 (log.f64 (hypot.f64 (-.f64 (/.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale))))))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) |
#s(approx (* (/ -1 (* (neg (* a b)) (* 4 (* a b)))) (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale)))))) (*.f64 a (fma.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 b #s(literal 0 binary64)))) (*.f64 a (*.f64 x-scale y-scale))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))))))))) |
(/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))))))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 x-scale x-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))))))) (*.f64 y-scale y-scale)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))))))))) |
(/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 a a)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 a (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 (*.f64 b b) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (*.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))))) (*.f64 a a)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (*.f64 b b)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (fma.f64 #s(literal 1/4 binary64) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 #s(literal 1/8 binary64) (fma.f64 y-scale (*.f64 (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))))))))) |
| Outputs |
|---|
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* y-scale 4) (* b 1/4)) (*.f64 b y-scale))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 #s(approx (pow (cos (* 1/180 (* angle (PI)))) 2) #s(literal 1 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b))))))) |
8 calls:
| 275.0ms | b |
| 77.0ms | angle |
| 45.0ms | (/.f64 angle #s(literal 180 binary64)) |
| 40.0ms | y-scale |
| 40.0ms | (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)) |
| Accuracy | Segments | Branch |
|---|---|---|
| 52.4% | 3 | a |
| 50.7% | 2 | b |
| 49.3% | 3 | angle |
| 56.6% | 3 | x-scale |
| 49.3% | 2 | y-scale |
| 43.1% | 1 | (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) |
| 49.3% | 3 | (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)) |
| 49.3% | 3 | (/.f64 angle #s(literal 180 binary64)) |
Compiled 236 to 97 computations (58.9% saved)
| Inputs |
|---|
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* y-scale 4) (* b 1/4)) (*.f64 b y-scale))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 y-scale #s(literal 4 binary64)) (*.f64 b #s(literal 1/4 binary64)))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 #s(literal 1/4 binary64) #s(approx (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (*.f64 (*.f64 b y-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) b) #s(approx (* (* y-scale (sqrt 2)) (sqrt 8)) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) #s(approx (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (*.f64 b (sqrt.f64 #s(literal 2 binary64)))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 (*.f64 b #s(literal 1/4 binary64)) (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 8 binary64)))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) #s(approx (* 1/4 (* (* a y-scale) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (*.f64 (*.f64 #s(literal 1/720 binary64) a) (*.f64 (*.f64 angle y-scale) (*.f64 (*.f64 (PI.f64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a y-scale) (*.f64 #s(approx (sin (* 1/180 (* angle (PI)))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))) |
#s(approx (* (/ -1 (* (neg (* a b)) (* 4 (* a b)))) (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) #s(approx (sqrt (* 2 (+ (/ (* (* a a) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale)) (/ (* (* b b) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale))))) (/.f64 (*.f64 a (sqrt.f64 #s(literal 2 binary64))) y-scale)))) |
#s(approx (* (/ -1 (* (neg (* a b)) (* 4 (* a b)))) (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (+ (/ (* (* a a) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale)) (/ (* (* b b) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 x-scale #s(approx (+ (* 1/8 (/ (* (* (* y-scale (sqrt 8)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (/ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (* (+ b a) (- b a)) (* (+ b a) (- b a)))))) (* y-scale y-scale))) (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (sqrt (/ 1 (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (* x-scale x-scale))) (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) #s(approx (neg (* b (+ (* 1/8 (/ (* (* y-scale y-scale) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (* y-scale y-scale) (* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* y-scale y-scale)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (* x-scale x-scale) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))) (/.f64 (*.f64 #s(literal -45 binary64) (*.f64 (*.f64 b (*.f64 y-scale y-scale)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 angle (*.f64 (*.f64 x-scale x-scale) (PI.f64)))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a y-scale) (*.f64 #s(approx (sin (* 1/180 (* angle (PI)))) (*.f64 angle (fma.f64 (*.f64 #s(literal -1/34992000 binary64) (*.f64 angle angle)) (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/180 binary64) (PI.f64))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))) |
(*.f64 (/.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (*.f64 a b)) (*.f64 #s(literal 4 binary64) (*.f64 a b)))) #s(approx (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale))))) (*.f64 (*.f64 a a) (*.f64 (*.f64 b (*.f64 b b)) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) #s(approx (* 1/4 (* (* a y-scale) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (*.f64 angle (fma.f64 (*.f64 #s(literal -1/139968000 binary64) a) (*.f64 (*.f64 (*.f64 angle angle) y-scale) (*.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 #s(literal 1/720 binary64) a) (*.f64 (*.f64 y-scale (PI.f64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 x-scale #s(approx (+ (* 1/8 (/ (* (* (* y-scale (sqrt 8)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (/ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (* (+ b a) (- b a)) (* (+ b a) (- b a)))))) (* y-scale y-scale))) (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (sqrt (/ 1 (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (* x-scale x-scale))) (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 #s(literal 0 binary64) (*.f64 b b))))) (*.f64 a (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/4 binary64) (*.f64 a (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 x-scale #s(approx (+ (* 1/8 (/ (* (* (* y-scale (sqrt 8)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (/ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (* (+ b a) (- b a)) (* (+ b a) (- b a)))))) (* y-scale y-scale))) (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (sqrt (/ 1 (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (* x-scale x-scale))) (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 #s(literal 0 binary64) (*.f64 b b)))) (*.f64 a (*.f64 x-scale x-scale))) (*.f64 (*.f64 #s(literal 1/4 binary64) a) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(approx (+ (* 1/8 (/ (* (* (* y-scale (sqrt 8)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (/ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (* (+ b a) (- b a)) (* (+ b a) (- b a)))))) (* y-scale y-scale))) (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (sqrt (/ 1 (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (* x-scale x-scale))) (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 #s(literal 0 binary64) (*.f64 b b)))) (*.f64 a (*.f64 x-scale x-scale))) (*.f64 (*.f64 #s(literal 1/4 binary64) a) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) x-scale)) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) #s(approx (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 angle angle) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))))))) b) (*.f64 b (sqrt.f64 #s(literal 2 binary64))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) #s(approx (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 angle angle) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))))) b) (*.f64 b (sqrt.f64 #s(literal 2 binary64))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 a (*.f64 y-scale (*.f64 #s(literal 4 binary64) (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 (*.f64 (*.f64 a y-scale) (*.f64 #s(literal 4 binary64) (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))) #s(literal 1/4 binary64)))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 (*.f64 (*.f64 b y-scale) (*.f64 #s(literal 4 binary64) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) #s(literal 1/4 binary64)))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 angle angle) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))))))))) b) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))) |
#s(approx (* (/ -1 (* (neg (* a b)) (* 4 (* a b)))) (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (+ (/ (* (* a a) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale)) (/ (* (* b b) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale))) (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 a (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 a y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 a (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 x-scale #s(approx (+ (* 1/8 (/ (* (* (* y-scale (sqrt 8)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (/ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (* (+ b a) (- b a)) (* (+ b a) (- b a)))))) (* y-scale y-scale))) (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (sqrt (/ 1 (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (* x-scale x-scale))) (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) #s(approx (neg (* b (+ (* 1/8 (/ (* (* y-scale y-scale) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (* y-scale y-scale) (* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* y-scale y-scale)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (* x-scale x-scale) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 b (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) #s(approx (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) #s(approx (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (*.f64 b (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) #s(approx (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (neg.f64 (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) #s(approx (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (neg.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 #s(approx (pow (cos (* 1/180 (* angle (PI)))) 2) #s(literal 1 binary64)) (*.f64 b b) (*.f64 (pow.f64 #s(approx (sin (* 1/180 (* angle (PI)))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 #s(approx (pow (cos (* 1/180 (* angle (PI)))) 2) #s(literal 1 binary64)) (*.f64 b b))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (*.f64 (sqrt.f64 (PI.f64)) (sqrt.f64 (PI.f64)))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 #s(approx (cos (* 1/180 (* angle (PI)))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/64800 binary64) (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 #s(literal 1/25194240000 binary64) (*.f64 angle angle)) (pow.f64 (PI.f64) #s(literal 4 binary64))))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))) |
#s(approx (* (/ -1 (* (neg (* a b)) (* 4 (* a b)))) (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) #s(approx (sqrt (* 2 (+ (/ (* (* a a) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale)) (/ (* (* b b) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale))))) (*.f64 (/.f64 (*.f64 a (sqrt.f64 #s(literal 2 binary64))) y-scale) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))) |
#s(approx (* (/ -1 (* (neg (* a b)) (* 4 (* a b)))) (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) #s(approx (sqrt (* 2 (+ (/ (* (* a a) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale)) (/ (* (* b b) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale))))) (*.f64 (/.f64 (*.f64 b (sqrt.f64 #s(literal 2 binary64))) y-scale) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))) |
#s(approx (* (/ -1 (* (neg (* a b)) (* 4 (* a b)))) (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (+ (/ (* (* a a) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale)) (/ (* (* b b) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale))) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 a a) (*.f64 (*.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64))) (*.f64 b b))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a y-scale) (*.f64 #s(approx (sin (* 1/180 (* angle (PI)))) (*.f64 angle (fma.f64 #s(literal 1/180 binary64) (PI.f64) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/34992000 binary64) (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 angle angle)) (pow.f64 (PI.f64) #s(literal 5 binary64)))))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))) |
#s(approx (* (/ -1 (* (neg (* a b)) (* 4 (* a b)))) (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (+ (/ (* (* a a) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale)) (/ (* (* b b) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale))) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 x-scale #s(approx (+ (* 1/8 (/ (* (* (* y-scale (sqrt 8)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (/ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (* (+ b a) (- b a)) (* (+ b a) (- b a)))))) (* y-scale y-scale))) (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (sqrt (/ 1 (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (* x-scale x-scale))) (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) #s(approx (neg (* b (+ (* 1/8 (/ (* (* y-scale y-scale) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (* y-scale y-scale) (* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* y-scale y-scale)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (* x-scale x-scale) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))) (/.f64 (+.f64 (neg.f64 (*.f64 (*.f64 (*.f64 angle angle) b) (fma.f64 #s(literal 1/720 binary64) (*.f64 (*.f64 (PI.f64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (PI.f64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 x-scale x-scale)) #s(literal -1/216 binary64)))))) (*.f64 #s(literal -45 binary64) (/.f64 (*.f64 (*.f64 b (*.f64 y-scale y-scale)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (*.f64 x-scale x-scale) (PI.f64))))) angle))))) |
#s(approx (* (/ -1 (* (neg (* a b)) (* 4 (* a b)))) (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) #s(approx (sqrt (* 2 (+ (/ (* (* a a) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale)) (/ (* (* b b) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale))))) (*.f64 (*.f64 a (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))))))) |
#s(approx (* (/ -1 (* (neg (* a b)) (* 4 (* a b)))) (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) #s(approx (sqrt (* 2 (+ (/ (* (* a a) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale)) (/ (* (* b b) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale))))) (*.f64 (*.f64 b (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 (*.f64 y-scale (exp.f64 (*.f64 (log.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 8 binary64))))) |
(*.f64 (/.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (*.f64 a b)) (*.f64 #s(literal 4 binary64) (*.f64 a b)))) #s(approx (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale))))) (*.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (+ (/ (* (* a a) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale x-scale)) (/ (* (* b b) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale x-scale))) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))))))) |
(*.f64 (/.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (*.f64 a b)) (*.f64 #s(literal 4 binary64) (*.f64 a b)))) #s(approx (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale))))) (*.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (+ (/ (* (* a a) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale x-scale)) (/ (* (* b b) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale x-scale))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)))))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 #s(literal 1/4 binary64) #s(approx (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (fma.f64 b (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/64800 binary64) (*.f64 b (*.f64 (*.f64 y-scale (*.f64 (PI.f64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 #s(literal 1/25194240000 binary64) (*.f64 (*.f64 (*.f64 angle angle) b) (*.f64 (*.f64 y-scale (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (cbrt.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 #s(approx (pow (cos (* 1/180 (* angle (PI)))) 2) #s(literal 1 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) #s(approx (* 1/4 (* (* a y-scale) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (*.f64 angle (fma.f64 #s(literal 1/720 binary64) (*.f64 a (*.f64 (*.f64 y-scale (PI.f64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 angle angle) (fma.f64 (*.f64 #s(literal -1/139968000 binary64) a) (*.f64 y-scale (*.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 #s(literal 1/90699264000000 binary64) a) (*.f64 (*.f64 (*.f64 angle angle) y-scale) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(approx (+ (* 1/8 (/ (* (* (* y-scale (sqrt 8)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (/ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (* (+ b a) (- b a)) (* (+ b a) (- b a)))))) (* y-scale y-scale))) (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (sqrt (/ 1 (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (* x-scale x-scale))) (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (*.f64 (neg.f64 b) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 #s(literal 2 binary64) #s(approx (+ (* 1/2 (* (* y-scale y-scale) (/ (* 2 (* (+ (* 1/2 (cos (* 2 (* 1/180 (* angle (PI)))))) 1/2) (/ (+ 1/2 (* -1/2 (cos (* 2 (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ 1/2 (* -1/2 (cos (* 2 (* 1/180 (* angle (PI)))))))))) (+ (* 1/2 (cos (* 2 (* 1/180 (* angle (PI)))))) 1/2)) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 4 binary64) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) x-scale)) |
#s(approx (* (/ -1 (* (neg (* a b)) (* 4 (* a b)))) (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))))) |
#s(approx (* (/ -1 (* (neg (* a b)) (* 4 (* a b)))) (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))))) |
#s(approx (* (/ -1 (* (neg (* a b)) (* 4 (* a b)))) (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (pow.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 #s(approx (sin (* 1/180 (* angle (PI)))) (*.f64 angle (fma.f64 (*.f64 #s(literal -1/34992000 binary64) (*.f64 angle angle)) (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/180 binary64) (PI.f64))))) #s(literal 2 binary64)) (*.f64 a a))))))) |
#s(approx (* (/ -1 (* (neg (* a b)) (* 4 (* a b)))) (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) #s(approx (sqrt (* 2 (+ (/ (* (* a a) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale)) (/ (* (* b b) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) y-scale) (sqrt.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))))) |
#s(approx (* (/ -1 (* (neg (* a b)) (* 4 (* a b)))) (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))))))) |
#s(approx (* (/ -1 (* (neg (* a b)) (* 4 (* a b)))) (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))))) |
#s(approx (* (/ -1 (* (neg (* a b)) (* 4 (* a b)))) (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))) |
#s(approx (* (/ -1 (* (neg (* a b)) (* 4 (* a b)))) (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) a) y-scale) (/.f64 a y-scale) (/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 y-scale y-scale))))))) |
#s(approx (* (/ -1 (* (neg (* a b)) (* 4 (* a b)))) (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))) |
(*.f64 (/.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (*.f64 a b)) (*.f64 #s(literal 4 binary64) (*.f64 a b)))) #s(approx (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale))))) (*.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))))) |
#s(approx (* (/ -1 (* (neg (* a b)) (* 4 (* a b)))) (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 y-scale y-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (exp.f64 (*.f64 (log.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 #s(approx (pow (cos (* 1/180 (* angle (PI)))) 2) #s(literal 1 binary64)) (*.f64 b b))))) #s(literal 1/2 binary64))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (pow.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a))))))) |
(/.f64 #s(approx (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale))))) (*.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 b a) (*.f64 #s(literal 4 binary64) (*.f64 b a)))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (exp.f64 (*.f64 (log.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 a a) (*.f64 (*.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64))) (*.f64 b b))))) #s(literal 1/2 binary64))))) |
(*.f64 (/.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (*.f64 a b)) (*.f64 #s(literal 4 binary64) (*.f64 a b)))) #s(approx (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale))))) (*.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (pow.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (*.f64 (sqrt.f64 (PI.f64)) (sqrt.f64 (PI.f64)))))) #s(literal 2 binary64)) (*.f64 a a))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 #s(approx (sin (* 1/180 (* angle (PI)))) (*.f64 angle (fma.f64 #s(literal -1/34992000 binary64) (*.f64 (*.f64 angle angle) (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64)))) (*.f64 #s(literal 1/180 binary64) (PI.f64))))) #s(literal 2 binary64)) (*.f64 a a))))))) |
(*.f64 (/.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (*.f64 a b)) (*.f64 #s(literal 4 binary64) (*.f64 a b)))) #s(approx (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale))))) (*.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (*.f64 (sqrt.f64 (PI.f64)) (sqrt.f64 (PI.f64))))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))))))) |
#s(approx (* (/ -1 (* (neg (* a b)) (* 4 (* a b)))) (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))) |
| Outputs |
|---|
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* y-scale 4) (* b 1/4)) (*.f64 b y-scale))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 #s(approx (pow (cos (* 1/180 (* angle (PI)))) 2) #s(literal 1 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a))))))) |
#s(approx (* (/ -1 (* (neg (* a b)) (* 4 (* a b)))) (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))))) |
#s(approx (* (/ -1 (* (neg (* a b)) (* 4 (* a b)))) (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) #s(approx (sqrt (* 2 (+ (/ (* (* a a) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale)) (/ (* (* b b) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale))))) (/.f64 (*.f64 a (sqrt.f64 #s(literal 2 binary64))) y-scale)))) |
1 calls:
| 23.0ms | x-scale |
| Accuracy | Segments | Branch |
|---|---|---|
| 54.3% | 4 | x-scale |
Compiled 6 to 5 computations (16.7% saved)
| Inputs |
|---|
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* y-scale 4) (* b 1/4)) (*.f64 b y-scale))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 y-scale #s(literal 4 binary64)) (*.f64 b #s(literal 1/4 binary64)))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 #s(literal 1/4 binary64) #s(approx (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (*.f64 (*.f64 b y-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) b) #s(approx (* (* y-scale (sqrt 2)) (sqrt 8)) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) #s(approx (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (*.f64 b (sqrt.f64 #s(literal 2 binary64)))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 (*.f64 b #s(literal 1/4 binary64)) (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 8 binary64)))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) #s(approx (* 1/4 (* (* a y-scale) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (*.f64 (*.f64 #s(literal 1/720 binary64) a) (*.f64 (*.f64 angle y-scale) (*.f64 (*.f64 (PI.f64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a y-scale) (*.f64 #s(approx (sin (* 1/180 (* angle (PI)))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))) |
#s(approx (* (/ -1 (* (neg (* a b)) (* 4 (* a b)))) (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) #s(approx (sqrt (* 2 (+ (/ (* (* a a) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale)) (/ (* (* b b) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale))))) (/.f64 (*.f64 a (sqrt.f64 #s(literal 2 binary64))) y-scale)))) |
#s(approx (* (/ -1 (* (neg (* a b)) (* 4 (* a b)))) (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (+ (/ (* (* a a) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale)) (/ (* (* b b) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 x-scale #s(approx (+ (* 1/8 (/ (* (* (* y-scale (sqrt 8)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (/ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (* (+ b a) (- b a)) (* (+ b a) (- b a)))))) (* y-scale y-scale))) (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (sqrt (/ 1 (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (* x-scale x-scale))) (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) #s(approx (neg (* b (+ (* 1/8 (/ (* (* y-scale y-scale) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (* y-scale y-scale) (* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* y-scale y-scale)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (* x-scale x-scale) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))) (/.f64 (*.f64 #s(literal -45 binary64) (*.f64 (*.f64 b (*.f64 y-scale y-scale)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 angle (*.f64 (*.f64 x-scale x-scale) (PI.f64)))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a y-scale) (*.f64 #s(approx (sin (* 1/180 (* angle (PI)))) (*.f64 angle (fma.f64 (*.f64 #s(literal -1/34992000 binary64) (*.f64 angle angle)) (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/180 binary64) (PI.f64))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))) |
(*.f64 (/.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (*.f64 a b)) (*.f64 #s(literal 4 binary64) (*.f64 a b)))) #s(approx (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale))))) (*.f64 (*.f64 a a) (*.f64 (*.f64 b (*.f64 b b)) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) #s(approx (* 1/4 (* (* a y-scale) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (*.f64 angle (fma.f64 (*.f64 #s(literal -1/139968000 binary64) a) (*.f64 (*.f64 (*.f64 angle angle) y-scale) (*.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 #s(literal 1/720 binary64) a) (*.f64 (*.f64 y-scale (PI.f64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 x-scale #s(approx (+ (* 1/8 (/ (* (* (* y-scale (sqrt 8)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (/ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (* (+ b a) (- b a)) (* (+ b a) (- b a)))))) (* y-scale y-scale))) (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (sqrt (/ 1 (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (* x-scale x-scale))) (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 #s(literal 0 binary64) (*.f64 b b))))) (*.f64 a (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/4 binary64) (*.f64 a (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 x-scale #s(approx (+ (* 1/8 (/ (* (* (* y-scale (sqrt 8)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (/ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (* (+ b a) (- b a)) (* (+ b a) (- b a)))))) (* y-scale y-scale))) (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (sqrt (/ 1 (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (* x-scale x-scale))) (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 #s(literal 0 binary64) (*.f64 b b)))) (*.f64 a (*.f64 x-scale x-scale))) (*.f64 (*.f64 #s(literal 1/4 binary64) a) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(approx (+ (* 1/8 (/ (* (* (* y-scale (sqrt 8)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (/ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (* (+ b a) (- b a)) (* (+ b a) (- b a)))))) (* y-scale y-scale))) (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (sqrt (/ 1 (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (* x-scale x-scale))) (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 #s(literal 0 binary64) (*.f64 b b)))) (*.f64 a (*.f64 x-scale x-scale))) (*.f64 (*.f64 #s(literal 1/4 binary64) a) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) x-scale)) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) #s(approx (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 angle angle) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))))))) b) (*.f64 b (sqrt.f64 #s(literal 2 binary64))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) #s(approx (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 angle angle) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))))) b) (*.f64 b (sqrt.f64 #s(literal 2 binary64))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 a (*.f64 y-scale (*.f64 #s(literal 4 binary64) (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 (*.f64 (*.f64 a y-scale) (*.f64 #s(literal 4 binary64) (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))) #s(literal 1/4 binary64)))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 (*.f64 (*.f64 b y-scale) (*.f64 #s(literal 4 binary64) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) #s(literal 1/4 binary64)))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 angle angle) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))))))))) b) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))) |
#s(approx (* (/ -1 (* (neg (* a b)) (* 4 (* a b)))) (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (+ (/ (* (* a a) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale)) (/ (* (* b b) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale))) (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 a (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 a y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 a (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 x-scale #s(approx (+ (* 1/8 (/ (* (* (* y-scale (sqrt 8)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (/ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (* (+ b a) (- b a)) (* (+ b a) (- b a)))))) (* y-scale y-scale))) (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (sqrt (/ 1 (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (* x-scale x-scale))) (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) #s(approx (neg (* b (+ (* 1/8 (/ (* (* y-scale y-scale) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (* y-scale y-scale) (* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* y-scale y-scale)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (* x-scale x-scale) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 b (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) #s(approx (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) #s(approx (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (*.f64 b (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) #s(approx (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (neg.f64 (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) #s(approx (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (neg.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 #s(approx (pow (cos (* 1/180 (* angle (PI)))) 2) #s(literal 1 binary64)) (*.f64 b b) (*.f64 (pow.f64 #s(approx (sin (* 1/180 (* angle (PI)))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 #s(approx (pow (cos (* 1/180 (* angle (PI)))) 2) #s(literal 1 binary64)) (*.f64 b b))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (*.f64 (sqrt.f64 (PI.f64)) (sqrt.f64 (PI.f64)))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 #s(approx (cos (* 1/180 (* angle (PI)))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/64800 binary64) (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 #s(literal 1/25194240000 binary64) (*.f64 angle angle)) (pow.f64 (PI.f64) #s(literal 4 binary64))))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))) |
#s(approx (* (/ -1 (* (neg (* a b)) (* 4 (* a b)))) (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) #s(approx (sqrt (* 2 (+ (/ (* (* a a) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale)) (/ (* (* b b) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale))))) (*.f64 (/.f64 (*.f64 a (sqrt.f64 #s(literal 2 binary64))) y-scale) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))) |
#s(approx (* (/ -1 (* (neg (* a b)) (* 4 (* a b)))) (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) #s(approx (sqrt (* 2 (+ (/ (* (* a a) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale)) (/ (* (* b b) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale))))) (*.f64 (/.f64 (*.f64 b (sqrt.f64 #s(literal 2 binary64))) y-scale) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))) |
#s(approx (* (/ -1 (* (neg (* a b)) (* 4 (* a b)))) (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (+ (/ (* (* a a) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale)) (/ (* (* b b) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale))) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 a a) (*.f64 (*.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64))) (*.f64 b b))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a y-scale) (*.f64 #s(approx (sin (* 1/180 (* angle (PI)))) (*.f64 angle (fma.f64 #s(literal 1/180 binary64) (PI.f64) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/34992000 binary64) (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 angle angle)) (pow.f64 (PI.f64) #s(literal 5 binary64)))))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))) |
#s(approx (* (/ -1 (* (neg (* a b)) (* 4 (* a b)))) (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (+ (/ (* (* a a) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale)) (/ (* (* b b) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale))) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 x-scale #s(approx (+ (* 1/8 (/ (* (* (* y-scale (sqrt 8)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (/ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (* (+ b a) (- b a)) (* (+ b a) (- b a)))))) (* y-scale y-scale))) (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (sqrt (/ 1 (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (* x-scale x-scale))) (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) #s(approx (neg (* b (+ (* 1/8 (/ (* (* y-scale y-scale) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (* y-scale y-scale) (* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* y-scale y-scale)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (* x-scale x-scale) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))) (/.f64 (+.f64 (neg.f64 (*.f64 (*.f64 (*.f64 angle angle) b) (fma.f64 #s(literal 1/720 binary64) (*.f64 (*.f64 (PI.f64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (PI.f64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 x-scale x-scale)) #s(literal -1/216 binary64)))))) (*.f64 #s(literal -45 binary64) (/.f64 (*.f64 (*.f64 b (*.f64 y-scale y-scale)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (*.f64 x-scale x-scale) (PI.f64))))) angle))))) |
#s(approx (* (/ -1 (* (neg (* a b)) (* 4 (* a b)))) (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) #s(approx (sqrt (* 2 (+ (/ (* (* a a) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale)) (/ (* (* b b) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale))))) (*.f64 (*.f64 a (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))))))) |
#s(approx (* (/ -1 (* (neg (* a b)) (* 4 (* a b)))) (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) #s(approx (sqrt (* 2 (+ (/ (* (* a a) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale)) (/ (* (* b b) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale))))) (*.f64 (*.f64 b (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 (*.f64 y-scale (exp.f64 (*.f64 (log.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 8 binary64))))) |
(*.f64 (/.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (*.f64 a b)) (*.f64 #s(literal 4 binary64) (*.f64 a b)))) #s(approx (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale))))) (*.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (+ (/ (* (* a a) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale x-scale)) (/ (* (* b b) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale x-scale))) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))))))) |
(*.f64 (/.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (*.f64 a b)) (*.f64 #s(literal 4 binary64) (*.f64 a b)))) #s(approx (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale))))) (*.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (+ (/ (* (* a a) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale x-scale)) (/ (* (* b b) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale x-scale))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)))))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 #s(literal 1/4 binary64) #s(approx (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (fma.f64 b (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/64800 binary64) (*.f64 b (*.f64 (*.f64 y-scale (*.f64 (PI.f64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 #s(literal 1/25194240000 binary64) (*.f64 (*.f64 (*.f64 angle angle) b) (*.f64 (*.f64 y-scale (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (cbrt.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 #s(approx (pow (cos (* 1/180 (* angle (PI)))) 2) #s(literal 1 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) #s(approx (* 1/4 (* (* a y-scale) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (*.f64 angle (fma.f64 #s(literal 1/720 binary64) (*.f64 a (*.f64 (*.f64 y-scale (PI.f64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 angle angle) (fma.f64 (*.f64 #s(literal -1/139968000 binary64) a) (*.f64 y-scale (*.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 #s(literal 1/90699264000000 binary64) a) (*.f64 (*.f64 (*.f64 angle angle) y-scale) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(approx (+ (* 1/8 (/ (* (* (* y-scale (sqrt 8)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (/ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (* (+ b a) (- b a)) (* (+ b a) (- b a)))))) (* y-scale y-scale))) (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (sqrt (/ 1 (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (* x-scale x-scale))) (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (*.f64 (neg.f64 b) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 #s(literal 2 binary64) #s(approx (+ (* 1/2 (* (* y-scale y-scale) (/ (* 2 (* (+ (* 1/2 (cos (* 2 (* 1/180 (* angle (PI)))))) 1/2) (/ (+ 1/2 (* -1/2 (cos (* 2 (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ 1/2 (* -1/2 (cos (* 2 (* 1/180 (* angle (PI)))))))))) (+ (* 1/2 (cos (* 2 (* 1/180 (* angle (PI)))))) 1/2)) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 4 binary64) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) x-scale)) |
| Outputs |
|---|
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* y-scale 4) (* b 1/4)) (*.f64 b y-scale))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 #s(approx (pow (cos (* 1/180 (* angle (PI)))) 2) #s(literal 1 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a))))))) |
#s(approx (* (/ -1 (* (neg (* a b)) (* 4 (* a b)))) (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) #s(approx (sqrt (* 2 (+ (/ (* (* a a) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale)) (/ (* (* b b) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale))))) (/.f64 (*.f64 a (sqrt.f64 #s(literal 2 binary64))) y-scale)))) |
3 calls:
| 18.0ms | x-scale |
| 17.0ms | b |
| 16.0ms | a |
| Accuracy | Segments | Branch |
|---|---|---|
| 51.3% | 4 | b |
| 51.1% | 3 | a |
| 52.2% | 3 | x-scale |
Compiled 18 to 15 computations (16.7% saved)
| Inputs |
|---|
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* y-scale 4) (* b 1/4)) (*.f64 b y-scale))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 y-scale #s(literal 4 binary64)) (*.f64 b #s(literal 1/4 binary64)))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 #s(literal 1/4 binary64) #s(approx (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (*.f64 (*.f64 b y-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) b) #s(approx (* (* y-scale (sqrt 2)) (sqrt 8)) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) #s(approx (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (*.f64 b (sqrt.f64 #s(literal 2 binary64)))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 (*.f64 b #s(literal 1/4 binary64)) (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 8 binary64)))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) #s(approx (* 1/4 (* (* a y-scale) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (*.f64 (*.f64 #s(literal 1/720 binary64) a) (*.f64 (*.f64 angle y-scale) (*.f64 (*.f64 (PI.f64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a y-scale) (*.f64 #s(approx (sin (* 1/180 (* angle (PI)))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))) |
#s(approx (* (/ -1 (* (neg (* a b)) (* 4 (* a b)))) (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) #s(approx (sqrt (* 2 (+ (/ (* (* a a) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale)) (/ (* (* b b) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale))))) (/.f64 (*.f64 a (sqrt.f64 #s(literal 2 binary64))) y-scale)))) |
#s(approx (* (/ -1 (* (neg (* a b)) (* 4 (* a b)))) (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (+ (/ (* (* a a) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale)) (/ (* (* b b) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 x-scale #s(approx (+ (* 1/8 (/ (* (* (* y-scale (sqrt 8)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (/ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (* (+ b a) (- b a)) (* (+ b a) (- b a)))))) (* y-scale y-scale))) (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (sqrt (/ 1 (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (* x-scale x-scale))) (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) #s(approx (neg (* b (+ (* 1/8 (/ (* (* y-scale y-scale) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (* y-scale y-scale) (* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* y-scale y-scale)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (* x-scale x-scale) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))) (/.f64 (*.f64 #s(literal -45 binary64) (*.f64 (*.f64 b (*.f64 y-scale y-scale)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 angle (*.f64 (*.f64 x-scale x-scale) (PI.f64)))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a y-scale) (*.f64 #s(approx (sin (* 1/180 (* angle (PI)))) (*.f64 angle (fma.f64 (*.f64 #s(literal -1/34992000 binary64) (*.f64 angle angle)) (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/180 binary64) (PI.f64))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))) |
(*.f64 (/.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (*.f64 a b)) (*.f64 #s(literal 4 binary64) (*.f64 a b)))) #s(approx (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale))))) (*.f64 (*.f64 a a) (*.f64 (*.f64 b (*.f64 b b)) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) #s(approx (* 1/4 (* (* a y-scale) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (*.f64 angle (fma.f64 (*.f64 #s(literal -1/139968000 binary64) a) (*.f64 (*.f64 (*.f64 angle angle) y-scale) (*.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 #s(literal 1/720 binary64) a) (*.f64 (*.f64 y-scale (PI.f64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 x-scale #s(approx (+ (* 1/8 (/ (* (* (* y-scale (sqrt 8)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (/ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (* (+ b a) (- b a)) (* (+ b a) (- b a)))))) (* y-scale y-scale))) (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (sqrt (/ 1 (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (* x-scale x-scale))) (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 #s(literal 0 binary64) (*.f64 b b))))) (*.f64 a (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/4 binary64) (*.f64 a (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 x-scale #s(approx (+ (* 1/8 (/ (* (* (* y-scale (sqrt 8)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (/ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (* (+ b a) (- b a)) (* (+ b a) (- b a)))))) (* y-scale y-scale))) (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (sqrt (/ 1 (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (* x-scale x-scale))) (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 #s(literal 0 binary64) (*.f64 b b)))) (*.f64 a (*.f64 x-scale x-scale))) (*.f64 (*.f64 #s(literal 1/4 binary64) a) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(approx (+ (* 1/8 (/ (* (* (* y-scale (sqrt 8)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (/ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (* (+ b a) (- b a)) (* (+ b a) (- b a)))))) (* y-scale y-scale))) (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (sqrt (/ 1 (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (* x-scale x-scale))) (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 #s(literal 0 binary64) (*.f64 b b)))) (*.f64 a (*.f64 x-scale x-scale))) (*.f64 (*.f64 #s(literal 1/4 binary64) a) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) x-scale)) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) #s(approx (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 angle angle) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))))))) b) (*.f64 b (sqrt.f64 #s(literal 2 binary64))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) #s(approx (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 angle angle) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))))) b) (*.f64 b (sqrt.f64 #s(literal 2 binary64))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 a (*.f64 y-scale (*.f64 #s(literal 4 binary64) (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 (*.f64 (*.f64 a y-scale) (*.f64 #s(literal 4 binary64) (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))) #s(literal 1/4 binary64)))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 (*.f64 (*.f64 b y-scale) (*.f64 #s(literal 4 binary64) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) #s(literal 1/4 binary64)))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 angle angle) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))))))))) b) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))) |
#s(approx (* (/ -1 (* (neg (* a b)) (* 4 (* a b)))) (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (+ (/ (* (* a a) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale)) (/ (* (* b b) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale))) (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 a (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 a y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 a (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 x-scale #s(approx (+ (* 1/8 (/ (* (* (* y-scale (sqrt 8)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (/ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (* (+ b a) (- b a)) (* (+ b a) (- b a)))))) (* y-scale y-scale))) (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (sqrt (/ 1 (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (* x-scale x-scale))) (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) #s(approx (neg (* b (+ (* 1/8 (/ (* (* y-scale y-scale) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (* y-scale y-scale) (* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* y-scale y-scale)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (* x-scale x-scale) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 b (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) #s(approx (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) #s(approx (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (*.f64 b (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) #s(approx (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (neg.f64 (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) #s(approx (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (neg.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 #s(approx (pow (cos (* 1/180 (* angle (PI)))) 2) #s(literal 1 binary64)) (*.f64 b b) (*.f64 (pow.f64 #s(approx (sin (* 1/180 (* angle (PI)))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 #s(approx (pow (cos (* 1/180 (* angle (PI)))) 2) #s(literal 1 binary64)) (*.f64 b b))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (*.f64 (sqrt.f64 (PI.f64)) (sqrt.f64 (PI.f64)))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 #s(approx (cos (* 1/180 (* angle (PI)))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/64800 binary64) (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 #s(literal 1/25194240000 binary64) (*.f64 angle angle)) (pow.f64 (PI.f64) #s(literal 4 binary64))))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))) |
#s(approx (* (/ -1 (* (neg (* a b)) (* 4 (* a b)))) (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) #s(approx (sqrt (* 2 (+ (/ (* (* a a) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale)) (/ (* (* b b) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale))))) (*.f64 (/.f64 (*.f64 a (sqrt.f64 #s(literal 2 binary64))) y-scale) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))) |
#s(approx (* (/ -1 (* (neg (* a b)) (* 4 (* a b)))) (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) #s(approx (sqrt (* 2 (+ (/ (* (* a a) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale)) (/ (* (* b b) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale))))) (*.f64 (/.f64 (*.f64 b (sqrt.f64 #s(literal 2 binary64))) y-scale) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))) |
#s(approx (* (/ -1 (* (neg (* a b)) (* 4 (* a b)))) (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (+ (/ (* (* a a) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale)) (/ (* (* b b) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale))) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) y-scale) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 a a) (*.f64 (*.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64))) (*.f64 b b))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a y-scale) (*.f64 #s(approx (sin (* 1/180 (* angle (PI)))) (*.f64 angle (fma.f64 #s(literal 1/180 binary64) (PI.f64) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/34992000 binary64) (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 angle angle)) (pow.f64 (PI.f64) #s(literal 5 binary64)))))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))) |
#s(approx (* (/ -1 (* (neg (* a b)) (* 4 (* a b)))) (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (+ (/ (* (* a a) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale)) (/ (* (* b b) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale))) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 x-scale #s(approx (+ (* 1/8 (/ (* (* (* y-scale (sqrt 8)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (/ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (* (+ b a) (- b a)) (* (+ b a) (- b a)))))) (* y-scale y-scale))) (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))) (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (sqrt (/ 1 (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) (* x-scale x-scale))) (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (* b b) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* a a)) (* y-scale y-scale))))))) #s(approx (neg (* b (+ (* 1/8 (/ (* (* y-scale y-scale) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (* y-scale y-scale) (* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* y-scale y-scale)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (* x-scale x-scale) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))) (/.f64 (+.f64 (neg.f64 (*.f64 (*.f64 (*.f64 angle angle) b) (fma.f64 #s(literal 1/720 binary64) (*.f64 (*.f64 (PI.f64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (PI.f64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 x-scale x-scale)) #s(literal -1/216 binary64)))))) (*.f64 #s(literal -45 binary64) (/.f64 (*.f64 (*.f64 b (*.f64 y-scale y-scale)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (*.f64 x-scale x-scale) (PI.f64))))) angle))))) |
#s(approx (* (/ -1 (* (neg (* a b)) (* 4 (* a b)))) (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) #s(approx (sqrt (* 2 (+ (/ (* (* a a) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale)) (/ (* (* b b) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale))))) (*.f64 (*.f64 a (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))))))) |
#s(approx (* (/ -1 (* (neg (* a b)) (* 4 (* a b)))) (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) #s(approx (sqrt (* 2 (+ (/ (* (* a a) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale)) (/ (* (* b b) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale))))) (*.f64 (*.f64 b (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 (*.f64 y-scale (exp.f64 (*.f64 (log.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 8 binary64))))) |
(*.f64 (/.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (*.f64 a b)) (*.f64 #s(literal 4 binary64) (*.f64 a b)))) #s(approx (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale))))) (*.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (+ (/ (* (* a a) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale x-scale)) (/ (* (* b b) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale x-scale))) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))))))) |
(*.f64 (/.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (*.f64 a b)) (*.f64 #s(literal 4 binary64) (*.f64 a b)))) #s(approx (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale))))) (*.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (+ (/ (* (* a a) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale x-scale)) (/ (* (* b b) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale x-scale))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)))))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 #s(literal 1/4 binary64) #s(approx (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (fma.f64 b (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/64800 binary64) (*.f64 b (*.f64 (*.f64 y-scale (*.f64 (PI.f64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 #s(literal 1/25194240000 binary64) (*.f64 (*.f64 (*.f64 angle angle) b) (*.f64 (*.f64 y-scale (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (cbrt.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))) |
| Outputs |
|---|
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* y-scale 4) (* b 1/4)) (*.f64 b y-scale))) |
#s(approx (* (/ -1 (* (neg (* a b)) (* 4 (* a b)))) (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) #s(approx (sqrt (* 2 (+ (/ (* (* a a) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale)) (/ (* (* b b) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale))))) (/.f64 (*.f64 a (sqrt.f64 #s(literal 2 binary64))) y-scale)))) |
1 calls:
| 15.0ms | x-scale |
| Accuracy | Segments | Branch |
|---|---|---|
| 50.4% | 2 | x-scale |
Compiled 6 to 5 computations (16.7% saved)
| Inputs |
|---|
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* y-scale 4) (* b 1/4)) (*.f64 b y-scale))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 y-scale #s(literal 4 binary64)) (*.f64 b #s(literal 1/4 binary64)))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 #s(literal 1/4 binary64) #s(approx (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (*.f64 (*.f64 b y-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) b) #s(approx (* (* y-scale (sqrt 2)) (sqrt 8)) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) #s(approx (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (*.f64 b (sqrt.f64 #s(literal 2 binary64)))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 (*.f64 b #s(literal 1/4 binary64)) (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 8 binary64)))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) #s(approx (* 1/4 (* (* a y-scale) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (*.f64 (*.f64 #s(literal 1/720 binary64) a) (*.f64 (*.f64 angle y-scale) (*.f64 (*.f64 (PI.f64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a y-scale) (*.f64 #s(approx (sin (* 1/180 (* angle (PI)))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))) |
| Outputs |
|---|
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a y-scale) (*.f64 #s(approx (sin (* 1/180 (* angle (PI)))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* y-scale 4) (* b 1/4)) (*.f64 b y-scale))) |
8 calls:
| 4.0ms | (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)) |
| 4.0ms | (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) |
| 3.0ms | a |
| 3.0ms | (/.f64 angle #s(literal 180 binary64)) |
| 3.0ms | x-scale |
| Accuracy | Segments | Branch |
|---|---|---|
| 37.6% | 1 | (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) |
| 40.6% | 2 | angle |
| 40.6% | 2 | (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)) |
| 40.6% | 2 | (/.f64 angle #s(literal 180 binary64)) |
| 41.2% | 2 | b |
| 37.6% | 1 | y-scale |
| 39.3% | 2 | a |
| 37.6% | 1 | x-scale |
Compiled 236 to 97 computations (58.9% saved)
| Inputs |
|---|
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* y-scale 4) (* b 1/4)) (*.f64 b y-scale))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 y-scale #s(literal 4 binary64)) (*.f64 b #s(literal 1/4 binary64)))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 #s(literal 1/4 binary64) #s(approx (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (*.f64 (*.f64 b y-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) b) #s(approx (* (* y-scale (sqrt 2)) (sqrt 8)) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) #s(approx (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (*.f64 b (sqrt.f64 #s(literal 2 binary64)))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 (*.f64 b #s(literal 1/4 binary64)) (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 8 binary64)))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) #s(approx (* 1/4 (* (* a y-scale) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (*.f64 (*.f64 #s(literal 1/720 binary64) a) (*.f64 (*.f64 angle y-scale) (*.f64 (*.f64 (PI.f64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))))))) |
| Outputs |
|---|
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) #s(approx (* 1/4 (* (* a y-scale) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (*.f64 (*.f64 #s(literal 1/720 binary64) a) (*.f64 (*.f64 angle y-scale) (*.f64 (*.f64 (PI.f64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* y-scale 4) (* b 1/4)) (*.f64 b y-scale))) |
1 calls:
| 3.0ms | b |
| Accuracy | Segments | Branch |
|---|---|---|
| 40.7% | 2 | b |
Compiled 6 to 5 computations (16.7% saved)
Total -0.2b remaining (-0.6%)
Threshold costs -0.2b (-0.6%)
| Inputs |
|---|
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* y-scale 4) (* b 1/4)) (*.f64 b y-scale))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 y-scale #s(literal 4 binary64)) (*.f64 b #s(literal 1/4 binary64)))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 #s(literal 1/4 binary64) #s(approx (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (*.f64 (*.f64 b y-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) b) #s(approx (* (* y-scale (sqrt 2)) (sqrt 8)) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) #s(approx (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a))))) (*.f64 b (sqrt.f64 #s(literal 2 binary64)))))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 (*.f64 b #s(literal 1/4 binary64)) (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 8 binary64)))) |
| Outputs |
|---|
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* y-scale 4) (* b 1/4)) (*.f64 b y-scale))) |
6 calls:
| 4.0ms | (/.f64 angle #s(literal 180 binary64)) |
| 3.0ms | (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) |
| 3.0ms | a |
| 3.0ms | (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)) |
| 3.0ms | b |
| Accuracy | Segments | Branch |
|---|---|---|
| 37.6% | 1 | (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.f64 (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) |
| 37.6% | 1 | a |
| 37.6% | 1 | angle |
| 37.6% | 1 | (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)) |
| 37.6% | 1 | (/.f64 angle #s(literal 180 binary64)) |
| 37.6% | 1 | b |
Compiled 224 to 87 computations (61.2% saved)
| 2× | binary-search |
| 1× | narrow-enough |
| 1× | narrow-enough |
| Time | Left | Right |
|---|---|---|
| 117.0ms | 5.249022892103884e+91 | 5.3743977366269293e+98 |
| 71.0ms | 5.389057820984661e-140 | 9.833127123827061e-138 |
| 106.0ms | 208× | 0 | valid |
| 64.0ms | 48× | 1 | valid |
| 5.0ms | 11× | 1 | exit |
Compiled 1 197 to 772 computations (35.5% saved)
ival-div: 46.0ms (28.4% of total)ival-mult: 36.0ms (22.2% of total)ival-pow2: 24.0ms (14.8% of total)ival-sin: 20.0ms (12.3% of total)ival-cos: 13.0ms (8% of total)ival-add: 7.0ms (4.3% of total)ival-sqrt: 6.0ms (3.7% of total)ival-sub: 3.0ms (1.9% of total)adjust: 3.0ms (1.9% of total)ival-neg: 2.0ms (1.2% of total)ival-pi: 1.0ms (0.6% of total)ival-assert: 0.0ms (0% of total)ival-true: 0.0ms (0% of total)exact: 0.0ms (0% of total)| 3× | binary-search |
| 1× | narrow-enough |
| 1× | narrow-enough |
| 1× | narrow-enough |
| Time | Left | Right |
|---|---|---|
| 91.0ms | 2.7682316085770793e+165 | 3.625014282739777e+168 |
| 69.0ms | 5.249022892103884e+91 | 5.3743977366269293e+98 |
| 1.0ms | 5.389057820984661e-140 | 9.833127123827061e-138 |
| 85.0ms | 51× | 1 | valid |
| 61.0ms | 157× | 0 | valid |
| 1.0ms | 3× | 1 | exit |
Compiled 1 777 to 1 175 computations (33.9% saved)
ival-sin: 31.0ms (23.5% of total)ival-pow2: 28.0ms (21.2% of total)ival-mult: 22.0ms (16.7% of total)ival-cos: 19.0ms (14.4% of total)ival-div: 14.0ms (10.6% of total)ival-add: 5.0ms (3.8% of total)ival-sqrt: 3.0ms (2.3% of total)adjust: 3.0ms (2.3% of total)ival-sub: 2.0ms (1.5% of total)ival-neg: 2.0ms (1.5% of total)ival-pi: 1.0ms (0.8% of total)ival-assert: 0.0ms (0% of total)ival-true: 0.0ms (0% of total)exact: 0.0ms (0% of total)| 2× | binary-search |
| 1× | narrow-enough |
| 1× | narrow-enough |
| Time | Left | Right |
|---|---|---|
| 93.0ms | 8.57970548849735e+144 | 1.137784410443965e+152 |
| 1.0ms | 5.389057820984661e-140 | 9.833127123827061e-138 |
| 46.0ms | 113× | 0 | valid |
| 40.0ms | 31× | 1 | valid |
Compiled 1 035 to 682 computations (34.1% saved)
ival-pow2: 16.0ms (21.3% of total)ival-mult: 16.0ms (21.3% of total)ival-sin: 11.0ms (14.6% of total)ival-div: 10.0ms (13.3% of total)ival-cos: 10.0ms (13.3% of total)ival-add: 4.0ms (5.3% of total)ival-sqrt: 2.0ms (2.7% of total)adjust: 2.0ms (2.7% of total)ival-sub: 1.0ms (1.3% of total)ival-pi: 1.0ms (1.3% of total)ival-neg: 1.0ms (1.3% of total)ival-assert: 0.0ms (0% of total)ival-true: 0.0ms (0% of total)exact: 0.0ms (0% of total)| 1× | binary-search |
| 1× | narrow-enough |
| Time | Left | Right |
|---|---|---|
| 84.0ms | 28174446090449.03 | 130752935632873.6 |
| 37.0ms | 26× | 1 | valid |
| 32.0ms | 70× | 0 | valid |
| 0.0ms | 1× | 1 | exit |
Compiled 395 to 208 computations (47.3% saved)
ival-mult: 16.0ms (24.7% of total)ival-sin: 14.0ms (21.6% of total)ival-cos: 12.0ms (18.5% of total)ival-pow2: 9.0ms (13.9% of total)ival-div: 7.0ms (10.8% of total)ival-add: 3.0ms (4.6% of total)ival-sqrt: 2.0ms (3.1% of total)adjust: 2.0ms (3.1% of total)ival-sub: 1.0ms (1.5% of total)ival-neg: 1.0ms (1.5% of total)ival-pi: 0.0ms (0% of total)ival-assert: 0.0ms (0% of total)ival-true: 0.0ms (0% of total)exact: 0.0ms (0% of total)| 1× | binary-search |
| 1× | narrow-enough |
| Time | Left | Right |
|---|---|---|
| 84.0ms | 3.5334239869817423e-186 | 2.236255414262127e-185 |
| 53.0ms | 28× | 1 | valid |
| 26.0ms | 68× | 0 | valid |
Compiled 413 to 226 computations (45.3% saved)
ival-cos: 17.0ms (22.7% of total)ival-mult: 14.0ms (18.7% of total)ival-sin: 14.0ms (18.7% of total)ival-div: 12.0ms (16.1% of total)ival-pow2: 9.0ms (12% of total)ival-sqrt: 2.0ms (2.7% of total)ival-add: 2.0ms (2.7% of total)adjust: 2.0ms (2.7% of total)ival-sub: 1.0ms (1.3% of total)ival-neg: 1.0ms (1.3% of total)ival-pi: 0.0ms (0% of total)ival-assert: 0.0ms (0% of total)ival-true: 0.0ms (0% of total)exact: 0.0ms (0% of total)| 1× | binary-search |
| 1× | narrow-enough |
| Time | Left | Right |
|---|---|---|
| 77.0ms | 3.5334239869817423e-186 | 2.236255414262127e-185 |
| 46.0ms | 21× | 1 | valid |
| 20.0ms | 59× | 0 | valid |
Compiled 401 to 214 computations (46.6% saved)
ival-mult: 24.0ms (38.8% of total)ival-add: 9.0ms (14.5% of total)ival-pow2: 7.0ms (11.3% of total)ival-sin: 6.0ms (9.7% of total)ival-div: 5.0ms (8.1% of total)ival-cos: 5.0ms (8.1% of total)ival-sub: 1.0ms (1.6% of total)adjust: 1.0ms (1.6% of total)ival-sqrt: 1.0ms (1.6% of total)ival-neg: 1.0ms (1.6% of total)ival-pi: 0.0ms (0% of total)ival-true: 0.0ms (0% of total)ival-assert: 0.0ms (0% of total)exact: 0.0ms (0% of total)| 1× | egg-herbie |
| 70× | *-commutative_binary64 |
| 4× | +-commutative_binary64 |
| 2× | 1-exp_binary64 |
| 2× | 1-exp_binary32 |
Useful iterations: 0 (0.0ms)
| Iter | Nodes | Cost |
|---|---|---|
| 0 | 245 | 4279 |
| 1 | 285 | 4279 |
| 1× | saturated |
| Inputs |
|---|
(if (<=.f64 x-scale #s(literal 4558654696180483/53631231719770388398296099992823384509917463282369573510894245774887056120294187907207497192667613710760127432745944203415015531247786279785734596024336384 binary64)) #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* y-scale 4) (* b 1/4)) (*.f64 b y-scale))) (if (<=.f64 x-scale #s(literal 1800000000000000066036757273633650607871145544009948344485114415578391603097837262871417277382656 binary64)) #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 #s(approx (pow (cos (* 1/180 (* angle (PI)))) 2) #s(literal 1 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a))))))) #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b))))))))) |
(if (<=.f64 x-scale #s(literal 4558654696180483/53631231719770388398296099992823384509917463282369573510894245774887056120294187907207497192667613710760127432745944203415015531247786279785734596024336384 binary64)) #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* y-scale 4) (* b 1/4)) (*.f64 b y-scale))) (if (<=.f64 x-scale #s(literal 4700000000000000080207344475256477832090566637995429178128993186975626626440801500972999195492352 binary64)) #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 #s(approx (pow (cos (* 1/180 (* angle (PI)))) 2) #s(literal 1 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a))))))) (if (<=.f64 x-scale #s(literal 7999999999999999195919147614667879417867667197924323362695610710844162857000354260930300562774104967172628681421638971129833579792512537571986118188856812460358762496 binary64)) #s(approx (* (/ -1 (* (neg (* a b)) (* 4 (* a b)))) (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))))) #s(approx (* (/ -1 (* (neg (* a b)) (* 4 (* a b)))) (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) #s(approx (sqrt (* 2 (+ (/ (* (* a a) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale)) (/ (* (* b b) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale))))) (/.f64 (*.f64 a (sqrt.f64 #s(literal 2 binary64))) y-scale))))))) |
(if (<=.f64 x-scale #s(literal 4558654696180483/53631231719770388398296099992823384509917463282369573510894245774887056120294187907207497192667613710760127432745944203415015531247786279785734596024336384 binary64)) #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* y-scale 4) (* b 1/4)) (*.f64 b y-scale))) (if (<=.f64 x-scale #s(literal 279999999999999990999773306804430432613854564488466590297319343406557730009579007330167074645552305918601323305711453719546161021407463437832336441344 binary64)) #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 #s(approx (pow (cos (* 1/180 (* angle (PI)))) 2) #s(literal 1 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a))))))) #s(approx (* (/ -1 (* (neg (* a b)) (* 4 (* a b)))) (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) #s(approx (sqrt (* 2 (+ (/ (* (* a a) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale)) (/ (* (* b b) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale))))) (/.f64 (*.f64 a (sqrt.f64 #s(literal 2 binary64))) y-scale)))))) |
(if (<=.f64 x-scale #s(literal 130000000000000 binary64)) #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* y-scale 4) (* b 1/4)) (*.f64 b y-scale))) #s(approx (* (/ -1 (* (neg (* a b)) (* 4 (* a b)))) (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) #s(approx (sqrt (* 2 (+ (/ (* (* a a) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale)) (/ (* (* b b) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale))))) (/.f64 (*.f64 a (sqrt.f64 #s(literal 2 binary64))) y-scale))))) |
(if (<=.f64 b #s(literal 704214475906993/153090103458041951154620325043801237641319743206933311288544235956760011447392195175450369025277569052617268428910122535686807015741471080782585043071649294869136754165183653769539196448293593632735232 binary64)) #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a y-scale) (*.f64 #s(approx (sin (* 1/180 (* angle (PI)))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))) #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* y-scale 4) (* b 1/4)) (*.f64 b y-scale)))) |
(if (<=.f64 b #s(literal 8879226000566433/612360413832167804618481300175204950565278972827733245154176943827040045789568780701801476101110276210469073715640490142747228062965884323130340172286597179476547016660734615078156785793174374530940928 binary64)) #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) #s(approx (* 1/4 (* (* a y-scale) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (*.f64 (*.f64 #s(literal 1/720 binary64) a) (*.f64 (*.f64 angle y-scale) (*.f64 (*.f64 (PI.f64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))))))) #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* y-scale 4) (* b 1/4)) (*.f64 b y-scale)))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* y-scale 4) (* b 1/4)) (*.f64 b y-scale))) |
| Outputs |
|---|
(if (<=.f64 x-scale #s(literal 4558654696180483/53631231719770388398296099992823384509917463282369573510894245774887056120294187907207497192667613710760127432745944203415015531247786279785734596024336384 binary64)) #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* y-scale 4) (* b 1/4)) (*.f64 b y-scale))) (if (<=.f64 x-scale #s(literal 1800000000000000066036757273633650607871145544009948344485114415578391603097837262871417277382656 binary64)) #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 #s(approx (pow (cos (* 1/180 (* angle (PI)))) 2) #s(literal 1 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a))))))) #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b))))))))) |
(if (<=.f64 x-scale #s(literal 4558654696180483/53631231719770388398296099992823384509917463282369573510894245774887056120294187907207497192667613710760127432745944203415015531247786279785734596024336384 binary64)) #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* y-scale 4) (* b 1/4)) (*.f64 b y-scale))) (if (<=.f64 x-scale #s(literal 1800000000000000066036757273633650607871145544009948344485114415578391603097837262871417277382656 binary64)) #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 #s(approx (pow (cos (* 1/180 (* angle (PI)))) 2) #s(literal 1 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a))))))) #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))))) |
(if (<=.f64 x-scale #s(literal 4558654696180483/53631231719770388398296099992823384509917463282369573510894245774887056120294187907207497192667613710760127432745944203415015531247786279785734596024336384 binary64)) #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* y-scale 4) (* b 1/4)) (*.f64 b y-scale))) (if (<=.f64 x-scale #s(literal 4700000000000000080207344475256477832090566637995429178128993186975626626440801500972999195492352 binary64)) #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 #s(approx (pow (cos (* 1/180 (* angle (PI)))) 2) #s(literal 1 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a))))))) (if (<=.f64 x-scale #s(literal 7999999999999999195919147614667879417867667197924323362695610710844162857000354260930300562774104967172628681421638971129833579792512537571986118188856812460358762496 binary64)) #s(approx (* (/ -1 (* (neg (* a b)) (* 4 (* a b)))) (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))))) #s(approx (* (/ -1 (* (neg (* a b)) (* 4 (* a b)))) (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) #s(approx (sqrt (* 2 (+ (/ (* (* a a) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale)) (/ (* (* b b) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale))))) (/.f64 (*.f64 a (sqrt.f64 #s(literal 2 binary64))) y-scale))))))) |
(if (<=.f64 x-scale #s(literal 4558654696180483/53631231719770388398296099992823384509917463282369573510894245774887056120294187907207497192667613710760127432745944203415015531247786279785734596024336384 binary64)) #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* y-scale 4) (* b 1/4)) (*.f64 b y-scale))) (if (<=.f64 x-scale #s(literal 4700000000000000080207344475256477832090566637995429178128993186975626626440801500972999195492352 binary64)) #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 #s(approx (pow (cos (* 1/180 (* angle (PI)))) 2) #s(literal 1 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a))))))) (if (<=.f64 x-scale #s(literal 7999999999999999195919147614667879417867667197924323362695610710844162857000354260930300562774104967172628681421638971129833579792512537571986118188856812460358762496 binary64)) #s(approx (* (/ -1 (* (neg (* a b)) (* 4 (* a b)))) (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))))))) #s(approx (* (/ -1 (* (neg (* a b)) (* 4 (* a b)))) (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) #s(approx (sqrt (* 2 (+ (/ (* (* a a) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale)) (/ (* (* b b) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale))))) (/.f64 (*.f64 a (sqrt.f64 #s(literal 2 binary64))) y-scale))))))) |
(if (<=.f64 x-scale #s(literal 4558654696180483/53631231719770388398296099992823384509917463282369573510894245774887056120294187907207497192667613710760127432745944203415015531247786279785734596024336384 binary64)) #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* y-scale 4) (* b 1/4)) (*.f64 b y-scale))) (if (<=.f64 x-scale #s(literal 279999999999999990999773306804430432613854564488466590297319343406557730009579007330167074645552305918601323305711453719546161021407463437832336441344 binary64)) #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 #s(approx (pow (cos (* 1/180 (* angle (PI)))) 2) #s(literal 1 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a a))))))) #s(approx (* (/ -1 (* (neg (* a b)) (* 4 (* a b)))) (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) #s(approx (sqrt (* 2 (+ (/ (* (* a a) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale)) (/ (* (* b b) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale))))) (/.f64 (*.f64 a (sqrt.f64 #s(literal 2 binary64))) y-scale)))))) |
(if (<=.f64 x-scale #s(literal 130000000000000 binary64)) #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* y-scale 4) (* b 1/4)) (*.f64 b y-scale))) #s(approx (* (/ -1 (* (neg (* a b)) (* 4 (* a b)))) (/ (sqrt (* (/ (* (neg (* b (* b (* a a)))) (* 8 (neg (* b (* b (* a a)))))) (* x-scale (* y-scale (* x-scale y-scale)))) (+ (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (+ (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale))) (- (/ (+ (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180)))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* angle (PI)) 1/180))))))) (* y-scale y-scale)))) (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle (PI)) 1/180)))) (* x-scale y-scale))))))))) (/ 1 (* x-scale (* y-scale (* x-scale y-scale)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) #s(approx (sqrt (* 2 (+ (/ (* (* a a) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale)) (/ (* (* b b) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale))))) (/.f64 (*.f64 a (sqrt.f64 #s(literal 2 binary64))) y-scale))))) |
(if (<=.f64 b #s(literal 704214475906993/153090103458041951154620325043801237641319743206933311288544235956760011447392195175450369025277569052617268428910122535686807015741471080782585043071649294869136754165183653769539196448293593632735232 binary64)) #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a y-scale) (*.f64 #s(approx (sin (* 1/180 (* angle (PI)))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))) #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* y-scale 4) (* b 1/4)) (*.f64 b y-scale)))) |
(if (<=.f64 b #s(literal 704214475906993/153090103458041951154620325043801237641319743206933311288544235956760011447392195175450369025277569052617268428910122535686807015741471080782585043071649294869136754165183653769539196448293593632735232 binary64)) #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a y-scale) (*.f64 #s(approx (sin (* 1/180 (* angle (PI)))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (sqrt.f64 #s(literal 2 binary64)))))))) #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* y-scale 4) (* b 1/4)) (*.f64 b y-scale)))) |
(if (<=.f64 b #s(literal 8879226000566433/612360413832167804618481300175204950565278972827733245154176943827040045789568780701801476101110276210469073715640490142747228062965884323130340172286597179476547016660734615078156785793174374530940928 binary64)) #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) #s(approx (* 1/4 (* (* a y-scale) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (*.f64 (*.f64 #s(literal 1/720 binary64) a) (*.f64 (*.f64 angle y-scale) (*.f64 (*.f64 (PI.f64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))))))) #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* y-scale 4) (* b 1/4)) (*.f64 b y-scale)))) |
(if (<=.f64 b #s(literal 8879226000566433/612360413832167804618481300175204950565278972827733245154176943827040045789568780701801476101110276210469073715640490142747228062965884323130340172286597179476547016660734615078156785793174374530940928 binary64)) #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (* 2 (+ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* a a)))))) #s(approx (* 1/4 (* (* a y-scale) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (*.f64 (*.f64 a #s(literal 1/720 binary64)) (*.f64 (*.f64 y-scale angle) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (PI.f64) (sqrt.f64 #s(literal 2 binary64))))))))) #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* y-scale 4) (* b 1/4)) (*.f64 b y-scale)))) |
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* (* y-scale 4) (* b 1/4)) (*.f64 b y-scale))) |
| 9 544× | lower-*.f64 |
| 9 544× | lower-*.f32 |
| 9 070× | lower-*.f64 |
| 9 070× | lower-*.f32 |
| 8 490× | lower-*.f64 |
Useful iterations: 0 (0.0ms)
| Iter | Nodes | Cost |
|---|---|---|
| 0 | 3043 | 252407 |
| 0 | 8178 | 247500 |
| 0 | 1006 | 65616 |
| 1 | 3348 | 62172 |
| 0 | 8158 | 60621 |
| 0 | 56 | 306 |
| 0 | 104 | 306 |
| 1 | 403 | 295 |
| 2 | 3385 | 281 |
| 0 | 8190 | 269 |
| 0 | 3869 | 344342 |
| 0 | 8022 | 337326 |
| 0 | 192 | 2595 |
| 0 | 334 | 2545 |
| 1 | 1277 | 2291 |
| 0 | 8978 | 2226 |
| 0 | 3170 | 271039 |
| 0 | 8271 | 265694 |
| 1× | fuel |
| 1× | iter limit |
| 1× | node limit |
| 1× | iter limit |
| 1× | node limit |
| 1× | iter limit |
| 1× | iter limit |
| 1× | node limit |
| 1× | iter limit |
| 1× | node limit |
| 1× | iter limit |
| 1× | iter limit |
| 1× | node limit |
| 1× | iter limit |
| 1× | node limit |
Compiled 955 to 615 computations (35.6% saved)
(abs a)
Compiled 2 184 to 874 computations (60% saved)
Loading profile data...